ファイルを 1 行ずつ読み取り、各行で文字列を分割して出力したいと考えています。ただし、スクリプトは偶数行のみを出力します。
ファイル:
line1:item1
line2:item2
line3:item3
line4:item4
line5:item5
line6:item6
そしてスクリプト:
$FILE = "file";
open($FILE, "<", "file") or die("Could not open file.");
while (<$FILE>) {
my $number = (split ":", <$FILE>)[1];
print $number;
}
出力:
item2
item4
item6