"take" instead of "take $_"

add feature for Perl 5 style "$_ less take", like so:

my @results =  gather {
    for (1..20){
        take if /2/; # instead of 'take $_'
    }
};

If this can be merged I will add some documentation, should that be desired.