Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
    my $maxref = allmax( map [ $_, $hashName{$_} ], sort keys %hashName );
    
    print "@$maxref\n";
    
  2. or download this
    b c 3