http://qs321.pair.com?node_id=1179960


in reply to Re^5: Feature Idea: qr//e
in thread Feature Idea: qr//e (updated with solutions)

Oops...

Well, qr//s should always be written with a standard /xms tail anyway, so

c:\@Work\Perl>perl -wMstrict -le "sub qre (&;*) { my $re = shift->(); return eval 'qr/$re/xms' . (@_ ? shift : '') or die $@; } ;; my $regex = qre{ join '|', qw/foo bar/ }i; print $regex; " (?msix:foo|bar)
:-))


Give a man a fish:  <%-{-{-{-<