2008-03-16 8.10 ファイルの最後の行を削除する Perl Cookbook Tie::FIleモジュールを使用して、ファイルを配列にtieする。 use Tie::File; tie @lines, Tie::File, $file or die; delete $lines[-1];