The following script is not appending to the file for some reason. Please bestow your wisdom on me oh great Perl gods. :-) ------------------------------------------------------------------------ -- #!/usr/bin/perl -w my $size=0; my @stat;
open(TEMPFILE, ">>/temp/temp.big_ass_file") or die "unable to write /temp/temp.big_ass_file:$\n"; while ($size < 15000000000) { print TEMPFILE "This is a test for caiLogA2. \n"; @stat = stat TEMPFILE; $size = $stat[7]; sleep 1; print STDOUT "test\n"; } close(TEMPFILE); ------------------------------------------------------------------ Thanks. Nate.