Perlには、特別な意味を持つグローバル変数「特殊変数」がたくさん用意されている。
perlvar - Perl で定義済みの変数 - perldoc.jp
Perlの特殊変数 - Perl入門ゼミ
whileの条件式に<IN>だけ書いている。
渡す相手がいないわけだが、実際には読み込んだ行文字列は、特殊変数"$_"に格納されている。
("$_"はデフォルト変数などと呼ばれている。)
また、"$."はファイルハンドルの現在の行番号を表している。
$ vi special_variable.pl $ ls special_variable.pl test.txt $ cat test.txt ABC DEF GHI JKL MNO $ perl special_variable.pl 1:ABC 2:DEF 3:GHI 4:JKL 5:MNO $
特殊変数を使って、行番号と行の内容を出力できた。