Perlでリクに答えるスクリプトを作るスレ

Perlでリクに答えるスクリプトを作るスレ at TECH

571:デフォルトの名無しさん
06/04/23 05:53:25
>>570
完成おめ！
才能がどうかは知らないけど、結局経験じゃないですかね？
俺も本スレで叩かれたりしながら勉強してますｗ

一応俺が用意してたスクリプト貼っておきます。。。
use strict;
my $c = 1;
open IN, 'filename';
while (<IN>) {
　　　　(/^$/) ? $c = 1 : print $c++ . ':';
　　　　print;
}
close IN;

次ページ

続きを表示

1を表示