Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: Unlink Permission Denied

by emilford (Friar)
on May 03, 2002 at 02:15 UTC ( #163694=note: print w/replies, xml ) Need Help??


in reply to Unlink Permission Denied

I'm not sure why those two lines of code don't work for you. I tossed them into a script and it removed the "output.txt" file just fine. Perhaps something before you attempt to unlink the file is causing you problems? What error are you getting from this? That might be helpful for us to know as well.

Replies are listed 'Best First'.
Re: Re: Unlink Permission Denied
by Marza (Vicar) on May 03, 2002 at 02:30 UTC
    It did? Well this is the code:
    sub mail_results { my $file = 'D:\Sysad-perl\scripts\Reports\AntiVirus Status\mailrpt +.txt'; if ( -e $file ) { # # Mail the report. my $sender = new Mail::Sender {smtp => 'synplcty.synplicity.co +m', from => 'mshember@synplicity.com'}; $sender->MailFile({to => 'mshember@synplicity.com', subject => 'McAfee AVP Level Report', msg => "Here is today's report.", file => $file} ); } unlink $file or $! == 2 or die "Cannot unlink $file: $!"; }

    This is the message

    Cannot unlink D:\Sysad-perl\scripts\Reports\AntiVirus Status\mailrpt.t +xt: Permission denied at D:\Sysad-perl\scripts\Reports\AntiVirus Stat +us\avpcheck.pl line 3 65.

    I wonder if the fact that it is win32 causing the problem?

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://163694]
help
Chatterbox?
Tanktalus goes fishing for compliments using vinegar as bait.

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (7)
As of 2018-05-24 21:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?