[Templates] segfault on long string in side notation

[Marcel Gruenauer]

Hi,

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.e.,

    [% "some long string" | lower %]

segfaults, as does

    [% "some long string" WRAPPER bold %]

whereas

    [% WRAPPER bold %] some long string [% END %]

is ok.

I've written a little test program to see when that happens; it seems
the segfault occurs if the string is 956 chars or longer.

    #!/usr/bin/perl

    use warnings;
    use strict;
    use Template;

    for (1..1000) {
            print "$_ chars\n";
            my $template = Template->new;
            my $str = 'a' x $_;
            my $text = qq![% "$str" | lower %]!;
            my $output;
            $template->process(\$text, {}, \$output)
                || die $template->error;
    }

Any ideas?

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"