Help for this page
$line_count = `wc -l $filename`
sub lines_in_file { my $f = shift; ... 1 while <FH>; $.; }
my $line_count = lines_in_file($filename);
www.com | www.net | www.org
No recent polls found