標準入出力

open関数を使うとき、引数は3要素で渡す。
また、ファイルハンドル名は変数として宣言することで、重複を避ける安全なコードとなる

ファイル読み込み

open(my $fh, '<', 'in.txt');
my @lines = <$fh>;
close($fh); 

ファイル書き込み

open(my $fh, '>', 'out.txt');
print $fh '東方花映塚';
close($fh);