Help for this page

Select Code to Download


  1. or download this
    use List::Util qw[ max maxstr ];

my @data2d = ...;

my $max = max( map max( @$_, ), @data2d );
  2. or download this
    use List::Util qw[ max ];;

...

print maxNd( @b );;
9981