> is there a way to add a -e to check to see if we have a file to unlink ?
How about:
open (FH, UPLOAD_DIR . "/$file") || die ( $q, "Error reading $file
for test : $!" );
That will stop processing at that point, if you aren't able to open
the file for any reason (like it doesn't exist).
Otherwise, how about something like:
$have_access = open (FH, UPLOAD_DIR . "/$file") ? 1 : 0;
if ($have_access) {
...we have access to the file, so do something...
}
> if ($_ !~ /\*{5} InTune/){
This should be:
if ($_ !=~ /\*{5} InTune/) {
--
http://xstonedogx.heroesmarket.net
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
