[comp.lang.perl] memory leak v3.44 split

usenet@carssdf.UUCP (John Watson) (03/04/91)

Please would someone else try this for me.

First run it without the "reset" and then run it again with the "reset".
I can't see any reason that the first case uses 130K more than the second.
More loops, more memory.


$t='aaaaaaaaaaaa_bbbbbbbbbbb_cccccccccc_ddddddddd';
while (++$x<1000) {
  @F=split(/_/,$t);
# reset 'F';
}
system 'ps -dl|egrep perl';


I am running on a Xenix 2.3.3 O/S with Xenix 2.3.0d Devl/Sys  I have tried
this with perl malloc, regular malloc and -lmalloc, all about the same.

I compile with -Oct and -Zp2

The problem cropped up recently and may have to do with the debug option,
but I have lost the recipy for the working version.  It's not the -Zp2,
that has been there all along due to requirements of my usersub.

Thanks,   John Watson     carssdf!usenet