in reply to Re3: Optimizing a string processing sub
in thread Optimizing a string processing sub

chromatic's context chaining:

my $count = () = $x =~ /(foo)/g;

Update: I'm not claiming to have originated it; I just liked the alliteration.

In Section Seekers of Perl Wisdom