了解Devel：：leak.

Question

下面是我正在使用的一段代码及其输出。

my $handle;
my $enterCount = Devel::Leak::NoteSV($handle);
print "$date entry $enterCount";
<<<< my piece of code >>>
my $leaveCount = Devel::Leak::CheckSV($handle);
print "$date exit $leaveCount"; 

输出：

1) 
Mon 11/10 02:34:55 entry 383852
Mon 11/10 02:35:03 exit 486726

2) 
Mon 11/10 04:00:31 entry 383852
Mon 11/10 04:00:39 exit 493216

3)
Mon 11/10 04:05:15 entry 383852
Mon 11/10 04:05:23 exit 493927

每次我运行我的脚本时，$enterCount的值都是相同的，而$leavecount的值却在不断增加。这意味着什么？它是否表示内存泄漏？它到底显示了什么？

Answer 1

您可以查看来自@ether的这些参考资料：

• Finding a Perl memory leak
• Are there any tools for finding memory leaks in my Perl program?
• Common Perl memory/reference leak patterns?

Github上的jkeroes有一个关于perl内存泄漏的resources列表。

Devel::Gladiator是一个很好的概述--你可以修改你的代码来适应POD的概要示例。