Thread rmdir permission denied unter Windows XP (43 answers)
Opened by Thomas at 2009-10-16 14:20

Gast Thomas
 2009-10-20 15:48
#127172 #127172
Hallo zusammen,

vielen Dank erst einmal für die Hilfe. Ich habe mich dafür entschieden, biancas Methode auszuprobieren, hab das nach einigem Hin und Her auch geschafft. Vermeintlich zumindest, denn das exakt gleiche Problem besteht auch mit dieser Variante ohne File::Find. :-/
Hier ein Auszug, ich kann gerne auch mal das ganze Skript posten, wenn es hilft.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26

my @delarray;
my @lesen;

push @lesen,"$suchpfad";
while (scalar @lesen) 
{
        my $verz = shift @lesen;
        opendir (VERZEICHNIS,$verz) or die "$!";
        foreach my $file (sort {$a cmp $b} readdir VERZEICHNIS) 
        {
                if (-d "$verz/$file") 
                {
              push @lesen,"$verz/$file" if $file ne '.' && $file ne '..';
            }
            elsif ($file =~ /^$xmldatei$/) 
            {  
               #hier mache ich noch ein paar wilde Sachen,
               # u.a. wieder Verzeichnisse in @delarray pushen
            }
        }
        closedir VERZEICHNIS;
}
foreach(@delarray)
{
        rmdir $_ || die "remove dir: $!";
}


Exakt beim letzten Verzeichnis kommt wieder permission denied.

View full thread rmdir permission denied unter Windows XP