Help for this page

Select Code to Download


  1. or download this
    my $i = 0;
foreach (sort sortHash (keys (%hashName))) {
  if ($i == 0) { $max = $hashName{$_}; last }
} # end-foreach
  2. or download this
    foreach (sort sortHash (keys (%hashName))) {
  $max = $hashName{$_};
  last;
} # end-foreach
  3. or download this
    my $max = ( sort sortHash (keys (%hashName)) )[0];

# also possible:
my $min = ( sort sortHash (keys (%hashName)) )[-1];
  4. or download this
    my ($max) = sort sortHash (keys (%hashName));