Buffering is probably the reason why the file is not written till later.

Try putting the following (from memory);

---------------------------------------------

use FileHandle;
open (STATUS, ">> status.txt") || die;
STATUS->autoflush(1);

----------------------------------------------


On Wed, 2003-08-27 at 15:48, T.S.Ravi Shankar wrote:
> Hi all :
> 
> I am running a process "n" number of times with a for loop.  I am
> interested in looking for the status at specific intervals(say at every
> 10 iterations).  I wrote the below shown code for this purpose but
> without success :
> 
> -------------------
> 
> open(STATUS,">> status.txt");
> for ($i=0; $i<=98985;$i++) {
>   system ("process");
>   if (($i%10)==0) 
>     { print STATUS "\n\n **** $i iterations over !!*****\n\n"; }
>   }
> close(STATUS);
> 
> ---------------------
> 
> "status.txt"  remains empty when the processes are run & the whole file
> is written only at the end of all iterations, which serves no purpose !!
> 
> Could you please help me out in solving this problem ??
> 
> Thanks,
> Ravi


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to