Perlコーディング初心者質問スレ Part 56

Perlコーディング初心 ..

731:727
08/01/14 20:18:57 4AKnbZN2
$i = 0;
while($list = <IN>){
　(undef,$name[$i],undef) = split(/：/, $list);
　$i++;
}
@name = sort(@name);
while($line = <@name>){
　print "<option value='$line'>$line</option>";
}
えーっと、コードはこのような感じです。
ファイルのDBにアクセスして、その中の一部を取り出しソートしてhtmlで出力するという形です。

次ページ

続きを表示

1を表示