Help for this page
use strict; use warnings; ... open($handle, ">$name"); return $handle; }
if ($read >= $fsize) { chomp($_ = <$in>); ... $out = nextfile($file, $fcount); print $out $/; }