http://www.perlmonks.org?node_id=26202


in reply to Re (2) Maqs: One for the regexp fans
in thread One for the regexp fans

yep. your variant is an enhanced one. I tried only to make a general idea. :)
/Maqs.