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