カテゴリー別アーカイブ: perl

perl テクニック 標準入力から読み込んでそのままファイル出力

とても短いコードでかけるのだが、省略が多すぎて混乱しがちなのも事実 open(FH, “>file.dat”); while() { print FH $_; } close(FH); のなかでSTDINが省略されている。 $_は読み込んだファイルの内容を表す。 なので標準入力が終わるまでひたすらループしてファイルに出力するプログラムというわけ。 同じものをjavaで書くと数十行になるかもしれない。

カテゴリー: perl | タグ: , , | コメントをどうぞ