Re^3: Using Parse::RecDescent to parse Perl-ish strings without resorting to string eval

my $mods_p = '';
my $mods_m = '';
($opts{$_} ? $mods_p : $mods_m) .= $_ for qw( x i s m );
$re = qr/(?$mods_p-$mods_m:$re)/;
[download]

Comment on Re^3: Using Parse::RecDescent to parse Perl-ish strings without resorting to string eval Download Code

Replies are listed 'Best First'.
Re^4: Using Parse::RecDescent to parse Perl-ish strings without resorting to string eval by polypompholyx (Chaplain) on Feb 29, 2008 at 20:25 UTC
Ah, of course. I am an idiot. `ikegami++`	[reply] [d/l]