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