Please help.  I am trying to delete a file. I wrote the below code 
but when executed nothing happens.  There is no error msg but the 
file is not deleted.

opendir (ADS, "$filepath/") || die "Can't open directory\n";
if (-e $file)
{
     unlink "$file";
}
else
{
     print "<html><body>There is no file by that name.</body></html>\n";
}
closedir(ADS);
*** Teresa Raymond
*** http://www.mariposanet.com
*** [EMAIL PROTECTED]

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

Reply via email to