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

GwenDragon
 2012-05-08 17:11
#158218 #158218
User since
2005-01-17
14599 Artikel
Admin1
[Homepage]
user image
say "Datei: $_" ... war nur ein Beispiel zum Testen der Ausgabe später ;)
Kommetier es aus.
Und wie du überprüfst, ob es die richtieg Datei ist, mittels Dateinamenvergleich, musst du doch wissen.

Also ich komme mit einem Testskript:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14

#!/usr/bin/perl

use 5.008;
use strict;
use warnings;

use File::Find;

my $dir = '.';

my @array;
find(sub { push @array, $File::Find::name }, $dir);

print @array;
in keine Endlos-Schleife und es werden mir die gefundenen Dateien ausgegeben.
Last edited: 2012-05-08 17:16:17 +0200 (CEST)
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View full thread Probleme mit File::Find