Help for this page
sub max { my ($max, @vars) = @_; for (@vars) { ... } return $max; }
sub max { my ($max, $next, @vars) = @_; return $max if not $next; return max( $max > $next ? $max : $next, @vars ); }
www.com | www.net | www.org
No recent polls found