■

微妙。foreachかmapかで迷ってしまった。
中央に燦然と輝く";"がすごく気になるがperlでファイルを操作したのは久しぶりでこれ以上は無理（笑

$ perl -e 'foreach(@ARGV){open F,$_;print <F>}'
$ perl -e 'foreach(@ARGV){open F,$_;print <F>}' a.txt b.txt
foo
bar
buzz
buzz
bar
foo
$ perl -e 'map {open F,$_;print <F>} @ARGV' a.txt b.txt
foo
bar
buzz
buzz
bar
foo