Re: Re: Perl Idioms Explained - @ary = $str =~ m/(stuff)/g

[antirice]

I've always attributed this behavior to perl's DWIM approach to usability. The reason all three return the same thing is pretty simple: in the case where your regex doesn't capture anything, the actual instance that matches is returned instead. Also, if you have more than one capturing portion, it will push the extras onto the array as well. Try this:

$str = "Ab stuff Cd stuff Ef stuff";

# case 1
@ary1 = $str =~ m/(stuff)/g ;

@ary2 = $str =~ m/(st)u(ff)/g ;

print "\@ary1 = @ary1\n";
print "\@ary2 = @ary2\n";
__DATA__
outputs:
@ary1 = stuff stuff stuff
@ary2 = st ff st ff st ff

Nifty, eh? I rather like this behavior. Also please note that the g only means return all instances where the pattern matches. If you remove the g from the regexes above, then only the first match is returned.

Hope this helps.

I just noticed this is my 200th post. Yay.

antirice    
The first rule of Perl club is - use Perl
The ith rule of Perl club is - follow rule i - 1 for i > 1