Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    my $minimum = min @{ $matrix{NI} };
    my @indices = indexes { $_ == $minimum } @{ $matrix{NI} };
    print "@indices";
    
  2. or download this
     1:57 >perl 774_SoPW.pl
    0 2
     1:57 >