Perl/モジュール/IO-All の変更点

追加された行はこの色です。
削除された行はこの色です。
Perl/モジュール/IO-All は削除されています。
Perl/モジュール/IO-All の差分を削除

* IO::Allモジュール [#d1722013]

** ファイルを先頭行と最終行を省いてコピーする [#xefe0fcb]
 use IO::All;
 
 my $in = io('in.txt');
 my $out = io('out.txt');
 my $temp = io('?'); #（必要ないが）一時ファイルを介してコピー
 for (my $i=1,my $n=@$in;$i<$n-1;$i++) {
     print $in->[$i],"\n";
     $temp->appendln($in->[$i]);
 }
 print "----\n";
 $temp->seek(0,0);
 while ($_ = $temp->getline) {
     print "$_";
     $out->appendln($_);
 }

in.txt 
 1
 2
 3
 4
out.txt
 2
 3
** マニュアル [#a127dace]
http://perldoc.jp/docs/modules/IO-All-0.31/All.pod