Thread File::Find geht nicht?: File::Find geht nicht? (4 answers)
Opened by Gast at 2006-04-26 10:58

bjt
 2006-04-27 12:33
#65333 #65333
User since
2006-04-27
2 Artikel
BenutzerIn
[default_avatar]
Hi,

das funzt ja ganz gut soweit ich wollte das jetzt aber weiter bauen und zwar
Code: (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
27
my $myRoot;
$myRoot = "/home/56501";


find(\&myFileFilter, $myRoot);
sub myFileFilter
{
  my $name = $File::Find::name;
  if($name =~ /caches$/ and -d $name)
  {
#print $name ."\n";
chmod(0777,$name);
print $name."\n";


my $filename;
                         chdir $name;

foreach $filename (<*.html>)
{

             print $filename."\n";

              chown("56666","65533",$filename);
}
}
}

also ich habe jetzt in dem 50000 Verzeichnis ein paar unterverzeichnisse eingebaut und darin dann chaches verzeichnisse.
also der chmod befehl für den ordner caches geht. er findet alle caches ordner und gibt denen 777 rechte.

das was jetzt dazu sollte war das er in jedem ordner nach html dateien sucht und auf denen den chown befehl ausführt. da ist aber das problem.... denn den chown befehl führt er nur in dem ersten caches ordner aus den er findet und nicht in allen die er findet.

was mach ich da noch falsch?

View full thread File::Find geht nicht?: File::Find geht nicht?