mark warren bracher wrote:
> I _did_ have the doubled installation you mention.  removing the old
> non-arch copy doesn't help; the test script from jonas still segfaults.

Using a newly installed Perl 5.6.1 on FreeBSD and TT 2.05a, the script
(see below) segfaulted. Interestingly, the warn's show that process() is
okay and segmentation fault apparently occurs during shutdown. I saw 1,
2, 3 and 4 but not "end".

By adding "exit" to the script, it works fine (no segfault)!  The pure
perl Template::Stash is fine with or without "exit". 

Very strange -- looks like it's time for gdb.

 - doug


#!/path/to/perl5.6.1 -w

use strict;
use Template 2;
use Carp;

warn "1\n";
my $th = Template->new();
warn "2\n";
my $params = { 'myfunc' => \&confess, };
warn "3\n";
$th->process(\*DATA, $params);
warn "4\n";
exit;           # <-- this seems to stop the segfault


END {
  warn "end\n";
}

__DATA__
[% myfunc() %]


Reply via email to