in reply to Re^3: Common Perl Idiomsin thread Common Perl Idioms
sub firstIdx { $_[ $_ ] eq $_[ 0 ] and return --$_ for 1 .. @_; return; } [download]
www.com | www.net | www.org
No recent polls found