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


in reply to More complicated regular expression?

/has address (\S+)/ and do_something($1);