Select Code to Download

use Modern::Perl;
use List::Util qw( max );
...
        } # End of anonymous hash constructor.
    } 0 .. $#lists;
}

Row  0  has a max of  9  in column(s)  2, 5
Row  1  has a max of  7  in column(s)  7, 9
...
Row  7  has a max of  9  in column(s)  7
Row  8  has a max of  8  in column(s)  0
Row  9  has a max of  9  in column(s)  0