| Subject: | I found a memory leak |
Please run the attached file. It leaks two 0-length ARRAYs for every invocation:
/root/perl5/perlbrew/perls/perl-5.16.0/lib/site_perl/5.16.0/x86_64-
linux/HTML/Template/Pro.pm 197 ARRAY(0x2673d90)
/root/perl5/perlbrew/perls/perl-5.16.0/lib/site_perl/5.16.0/x86_64-
linux/HTML/Template/Pro.pm 197 ARRAY(0x2673e68)
It is a shame, because H:T:P is probably the best html template module I have seen on CPAN.
Linux 2.6.26-2-amd64 #1 SMP Sun Mar 4 21:48:06 UTC 2012 x86_64 GNU/Linux
| Subject: | htpleaktest.pl |
use 5.016;
use Modern::Perl;
use HTML::Template::Pro;
use Test::LeakTrace;
sub sample_template {
my $template = HTML::Template::Pro->new(filename => 'htpleaktest.tmpl'); #it is a blank file
print $template->output;
}
sample_template(); #so that H::T::P is initialized
my @info = leaked_info {
sample_template();
};
for my $af (sort { $$a[1] cmp $$b[1] || $$a[2] cmp $$b[2] || $$a[0] cmp $$b[0] } @info) { #[$ref, $file, $line]
print "$$af[1]\t$$af[2]\t$$af[0]\n";
}