Thread Probleme mit File::Find (12 answers)
Opened by Lebewesen at 2012-05-08 16:35

Lebewesen
 2012-05-08 16:35
#158212 #158212
User since
2011-09-09
62 Artikel
BenutzerIn

user image
Hallo,

im Augenblick nutze ich Find::File so:
Code (perl): (dl )
find({preprocess => sub { return sort @_ },wanted => \&Umwandeln}, "$dir");


allerdings soll jetzt noch eine Progressbar hinzukommen, das das Script sonst nichts ausgibt, und doch einige Zeit läuft.

Im Augenblick überprüfe ich in der Funktion &Umwandeln ob ich die Datei überhaupt nutze.

Meine Idee ist folgende:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
use Term::ProgressBar;

Findfile sucht nur "\d*.txt" - bzw gibt eine Liste zurück, wo nur diese Dateien enthalten sind.
my $Dateienanzahl = AnzahlDerDateienVonFindFile
my $Zaehler=1;
my $progress = Term::ProgressBar->new ({count => $Dateienanzahl ,name => 'Bearbeite'});
foreach my $Datei (@dateien) { #@dateien ist Liste von Find::File
    $progress->update($Zaehler);
    &Umwandeln;
    $Zaehler++;
}


Ich bekomme Find einfach nicht dazu, dass es mir die Dateien in eine Variable ausgibt - ich habe schon mehrere Varianten probiert, die ich im Netz gefunden habe, aber es scheint immer zu einer Endlosschleife zu kommen...

modedit Editiert von pq: Find::File im Titel und Tag mit File::Find ersetzt
Last edited: 2012-05-08 17:09:57 +0200 (CEST)

View full thread Probleme mit File::Find