User since
2005-10-19
44
Artikel
BenutzerIn
Hi alle miteinander.
Ich wuerde gern eine Ordner Struktur nach exe files durchsuchen und deren Namen und Pfad abspeichern um sie nachher ausfuehren zu koennen.
Ich moechte alle exe files die innerhalb eines Ordners liegen der mehrere Unterordner beinhaltet.
Hoffe ihr koennt mir helfen
Beispiel fuer Ordnerstruktur.
C:\test
--> ordner1
--> run1.exe
--> ordner2
--> run2.exe
--> ordner3
--> run3.exe
User since
2003-08-04
14371
Artikel
ModeratorIn
Dafür verwendest Du am besten
File::Find:
#!/usr/bin/perl
use strict;
use warnings;
use File::Find;
my @exes;
my $startdir = 'C:\test';
find(\&wanted,$startdir);
print $_,"\n" for(@exes);
sub wanted{
my $file = $File::Find::name;
push(@exes,$file) if ($file =~ /\.exe$/);
}
User since
2005-10-19
44
Artikel
BenutzerIn
Danke schon mal, wenn ich weitere Fragen habe melde ich mich nochmal