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


in reply to extract substring between token a and token b

you guys are awesome thanks