Help for this page
&spl($total) if ($len != 1);
$total = &spl($total) if ($len != 1);
sub spl { my ($num1) = @_; ... $num1 = $total; } }
sub spl { my ($n) = @_; ... } return $n; }
use List::Util qw( sum ); ... } return $n; }
www.com | www.net | www.org
No recent polls found