Regular Expression Annoyance

Tom Hukins tom at
Sun Jun 13 14:35:05 PDT 2010

On Sun, Jun 13, 2010 at 05:06:28PM +0200, Jan Henning Thorsen wrote:
> What about:
>  perl -e 'use Test::More "no_plan"; like("X", qr/(X)(?{$x=$1})/ ); diag $x'

Thanks, that's clever and it does the job.  I still think I like
Colin's "stop trying so hard" approach best, though.


More information about the MiltonKeynes-pm mailing list