CGI Maximum Value of an Array
Maximum Value of an Array
sub max {
my($max) = shift;
foreach (@_) {
$max = $_ if $max < $_;
}
$max;
}
CODE
LIBARY.COM
sub max {
my($max) = shift;
foreach (@_) {
$max = $_ if $max < $_;
}
$max;
}