Help for this page
sub firstidx(&@) { my $code = shift; $code->( $_[ $_ ] ) and return $_ for 0 .. $#_; }
sub firstidx(&@) { my $code = shift; $code->( local $_ = $_[ $_ ] ) and return $_ for 0 .. $#_; }