> how they were monitoring and/or determining this. Basically,
> I would like
> help with a Perl test script to use memory until Perl reaches
> it's memory
> limit. This will help me to know when I have things right so
> I don't have
> to keep going back to the end users and tell them "OK, try it now".
> Thanks in advance for any help.
use strict;
my $bigbuf;
my $buf;
open IN, '/dev/random' or die "Can't open random device: $!";
while( read(IN, $buf, 16384) > 0 ) {
$bigbuf .= $buf;
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
