On Sun, Nov 30, 2008 at 4:58 PM, Eric Brine <ikegami@adaelis.com> wrote:
> Isn't the problem here that 5.8 suffered from very a sticky /m?
I forgot to include a workaround:
$rules =~ s{^RULES\n(.*?)^ENDRULES}{
my $c = $1;
no warnings 'deprecated'; # <--
local $* = 0; # <--
$c =~ s/\n$/ARGH/;
print ">>$c<<\n\n";
}gems;
- Eric
Thread Previous
|
Thread Next