Hello,

I was wondering if anyone would know
why rmdir wouldn't remove an empty directory?

This is the code that I'm using:

use strict;

my $directoryempty = undef;
my $searchdrive1 = 'I:\\';

opendir(EMPTYDIR, $searchdrive1) ;
       while($directoryempty  = readdir(EMPTYDIR) ) {
           chomp $directoryempty;
           rmdir ("$directoryempty") || warn "Cannot remove directory
$directoryempty\n";
         }

thanks,

John
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to