in reply to Re^3: Common Perl Idioms
in thread Common Perl Idioms

sub firstIdx { 
    $_[ $_ ] eq $_[ 0 ] and return --$_ for 1 .. @_; 
    return; 
}

[download]
Examine what is said, not who speaks.
"Efficiency is intelligent laziness." -David Dunham
"Think for yourself!" - Abigail
"Memory, processor, disk in that order on the hardware side. Algorithm, algoritm, algorithm on the code side." - tachyon

In Section Meditations