Select Code to Download

#include <EXTERN.h>
#include <perl.h>

...

    PERL_SYS_TERM();
}

==10428== 116 bytes in 15 blocks are definitely lost in loss record 1 
+of 2
==10428==    at 0x4A1BDEB: malloc (vg_replace_malloc.c:207)
==10428==    by 0x497945: Perl_safesysmalloc (util.c:78)
...
==10428==      possibly lost: 0 bytes in 0 blocks.
==10428==    still reachable: 1,109 bytes in 17 blocks.
==10428==         suppressed: 0 bytes in 0 blocks.