On Sat, 3 Nov 2001 22:40:35 -0600 ,
"Gonyou, Austin" <austin@xxxxxxxxxxxxxxx> wrote:
>3. spew-fork.pl will cause a runaway system lock about 50% of the time, a
>XFS shutdown and kernel oops 25%of the time and nothing another 25% of the
>time. Either the IO is just too great when writing to 4 files at a time, or
>something else is wrong. I've seen perl break systems plenty of times
>before, but the problem here though is that it is successful about 25% of
>the time. Something is inconsistent I think.
I am running a slightly modified spew.pl in a tight loop on a dual
Celeron 466 (Abit BP6), 2.4.14-pre7-xfs, no acl or quota, ncr53c875, a
pair of IBM SCSI drivers, no raid. It runs for me with no problems.
while (true) ; do rm -f spew.out ; \time ./spew.pl ; done
It runs out of space after a while and aborts, but it does not hang for
me. Sorry, I cannot reproduce your problem.
#!/usr/bin/perl -w
$|=1;
open(FD, ">>spew.out");
while (1) {
print FD "asdklfasd;kfjsad;kfjs;dlj a;sdlkfnas,nfp9ibvp98ay085hq325l;mndfg'adfa
'sd;lmf,m/,sd\fasdfna.,mdnf.m,ansdflkjanfoiuahsel;kjrqwe\as\df]adfh\||PPOt'rq[tjwq.,mnt/><ZXDNF{OLPIAHSEMN>M<Nl;kjahestlkjahsdklfmsd;lifqpownj;n;lakfn;KH;LKH;LKGJAPSOIJ";
die "print failed $!" if $!;
}
close FD;
|