http://qs1969.pair.com?node_id=741818

perldoc perlfaq1 | perl -ne '/((?<=")(.+hack...(?:OR)?))/&&die$2.$/' -

Replies are listed 'Best First'.
Re: Perl FAQ
by ambrus (Abbot) on Feb 09, 2009 at 17:42 UTC