Select Code to Download

sub nFor(&@) {
    my $code = shift;
...
            while $i >= 0 and $indices[ $i ] == $limits[ $i ];
    }
}

sub _NL_Args
{
...
    }
    return wantarray ? @ret : ( $ret[0] || 0 );
}