くだすれPerl（超初心者用）

くだすれPerl（超初心者用） at PHP

222:nobodyさん
07/07/11 09:43:51
>>216
ほれ。ﾁｮｰわかりやすいサンプルを書いてやったぜ。

#! /usr/bin/env perl
$csv = <<"_CSV_";
activePerlで,Perl,始めたんだけど、,エクセルの,データか,CSVから,
それぞれの,行、列から,数値を,取り出したいんですけど、,
どこかに,良いサンプルか,参考になる,サイトは,ないですか？
_CSV_
grep{push(@d2a,[split(/,/)])}split(/\r?\n/,$csv); # 格納
for(@d2a){print for(@$_);print "\n";} # 表示

次ページ

続きを表示

1を表示