Tim,
You should close your file handles in your parsing code, before you unlink
hth,
Mark G
----- Original Message -----
From: Tim Donahue <[EMAIL PROTECTED]>
Date: Friday, September 10, 2004 2:58 pm
Subject: Removing a tempdir's on Windows
> Hello, I am writing a custom log parser for our Squid proxy, and I
> haverun into some problems with trying to use a temporary
> directory. The
> script parses all the logs, dumping those that are of interest to
> us for
> the various parts of the report to smaller, easier to handle
> files. I
> am using the following statement to create a temporary directory which
> works out great, removing most of the files, unfortunately I can not
> seem to make it remove all the files.
>
> our $templogs_base = 'C:\squid\var\log\SquidLog';
> our $templogs = tempdir( DIR => $templogs_base, CLEANUP => 1 );
>
>
> When I run the script, I get the following errors:
>
> Can't unlink file C:\squid\var\log\SquidLog\5FIwr0r4nz/tmp-
> stb.com.txt: Permission denied at C:/SFU/Perl/lib/File/Temp.pm
> line 845
> Can't remove directory C:\squid\var\log\SquidLog\5FIwr0r4nz:
> Directory not empty at C:/SFU/Perl/lib/File/Temp.pm line 845
>
> I have thought about manually running unlink on all the files
> contained
> within that directory, however that seems like an ugly kludge to force
> the removal of the temporary directory.
>
> Can anyone shed some light on a clean way to do this?
>
> Tim Donahue
>
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> <http://learn.perl.org/> <http://learn.perl.org/first-response>
>
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
