Well, after searching I come to this:

#-------------------
sub WriteLog
{
 open(OUTF,">>$filenamedate.dat") or die("Couldn't open $filenamedate.dat
for writing: $!");

 # This locks the file so no other CGI can write to it at the
 # same time...
 flock(OUTF,2);

 # Reset the file pointer to the end of the file, in case
 # someone wrote to it while we waited for the lock...
 seek(OUTF,0,2);

 print OUTF "$linha\n";
 close(OUTF);
}
#-------------------

Where $filenamedate will have something like "2002-05-06" and $linha will
contain the information I need to append to the file.

Will this code run fine on a website with several simultaneous accesses?

Rafael



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

Reply via email to