ＰＨＰのファイルの読み方のコード

質問

下記はpearlのファイルの読み込みです
#!/usr/local/bin/perl
print "Content-type: text/html\n";
print "\n";
require './jcode.pl';
if (!open(IN,"$userfile")) { &error("投稿データファイルを開けません"); }
@DATA = <IN>;
@DATA = reverse(@DATA);
close(IN);
foreach $line (@DATA){
($f1,$f2,$f3) = split(/,/, $line);
&jcode'convert(*line,'sjis');
push(@CS,$line);
}
foreach (1.. 100) {
($f1,$f2,$f3) = split(/,/, $CS[$_]);
print "$f1\n";
}
exit;
##############################################
foreach (1.. 100) {
($f1,$f2,$f3) = split(/,/, $CS[$_]);
print "$f1\n";
}
この部分のＰＨＰのコ－ド書き方をお願いします

回答No.2

php504 · ベストアンサー

for ($i = 1; $i <= 100; $i++) {
list($f1, $f2, $f3) = explode(",", $CS[$i]);
print "$f1\n";
}

お礼

回答ありがとうございます
下記のコードで出来ました。
for ($i = 1; $i <= 10; $i++) {
list($f1, $f2, $f3) = fgetcsv($CS, 1000, ",");
print "$f1\n";
}

回答No.1

shimix

まとめて処理するのであればfile()で読むと楽だと思います。

　　$data = file($userfile);
　　foreach ($data as $line) {
　　　　list($f1, $f2, $f3) = explode(',', $line);
　　　　}

みたいな感じですかね。わからない部分はphpのリファレンスで確認してください。元のソースを解析するのが面倒なので「そのまま」は書いていませんのであしからず。