in reply to index of the minimum element of the array

Here's one way

perl -e 'use List::Util qw|min|; $pos = 0; @a = qw|95 41  3 9 2|;  %ha
+shPos = map {$_=>$pos++} @a; print $hashPos{scalar min @a};'

Prints
4

[download]

Celebrate Intellectual Diversity

In Section Seekers of Perl Wisdom