On Wed, Jun 19, 2002 at 10:54:46AM +0100, Mark Fowler wrote:
> On Wed, 19 Jun 2002, Marcel Gruenauer wrote:
> 
> > TT 2.07 segfaults on Mac OS X 10.1.5 (perl 5.6.0) if a long string is
> > used with filters or wrappers in side notation. 
> 
> I ran Marcel's test script on Linux on i386 with 5.6.0, 5.6.1 and 5.8.0RC1
> and didn't get a coredump.

Thanks; I've reduced the error to the following:

    #!/usr/bin/perl
    $_ = sprintf qq!"%s"! => 'a' x 957;   # 956 is ok
    print "<1> = $1" while /(["'])((?:\\\\|\\\1|.|\n)*?)\1/gm;

which segfaults on 5.6.0 on OS X with the indicated 957 char (or longer)
string, but is ok with shorter strings.

Seems like a good time to upgrade to bleadperl.

Marcel

-- 
We are Perl. Your table will be assimilated. Your waiter will adapt to
service us. Surrender your beer. Resistance is futile.
 -- London.pm strategy aka "embrace and extend" aka "mark and sweep"


Reply via email to