#!/usr/bin/perl for (my $j=0;$j<10000;$j++) { my $result = `ls` ; print $result ; }
>ps uf 2740 pts/7 S 0:00 \_ /usr/bin/perl ./t5.pl 2894 pts/7 T 0:00 \_ ls 2895 pts/7 Z 0:00 \_ [ls <defunct>]
I don't think that is Perl; the OpSys is responsible for cleaning up zombies...
Besides, this code work fine under Solaris 9 with 1GB RAM.
-Sx-
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
