Your use of flock is classic race condition, you're not supposed to unlock, simply close the filehandle. See Order of flock and open, File Locking Tricks and Traps
A function called Warning_One should probably not call exit :) thats like a warning shot to the brain :) oops :)
For maintainability, small style suggestion, instead of a comment ########## MAIN PROGRAM #########, make it a function called Main, see template at (tye)Re: Stupid question (and one discussion of that template Re^2: RFC: Creating unicursal stars)
In the same spirit (of reusability), lexical filehandles are prefered to the global ones (like RESULTS). See the book Modern Perl Released as Free ePub for many such suggestions, it is a loose description of how experienced and effective Perl 5 programmers work....You can learn this too.
In reply to Re: is this script secured enough from internet attacks
by Anonymous Monk
in thread is this script secured enough from internet attacks
by tercoz
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |