Thread File::Find - bestimmte Dateien in Verzeichnis finden (21 answers)
Opened by Henri at 2015-04-22 00:00

Gast Henri
 2015-04-22 00:00
#180762 #180762
Hallo Leute, ich versuche schon lange zu verstehen, wie es mit dem modul file::Find geht, da ich ein script habe, das gut funktioniert, aber ich möchte meine skript auf mehreren Dateien die sich in dem gleichen Ordner befindet laufen, leider kriege ich es nicht. ich laube sollte man das subroutine &wanted benutzen.
als kleine übung habe ich eine code die alle Dateien, die die name mit den Buschtabe t und d anfangen, in einem Odner auf meinem PC ermitteln. Leider hilft mir es nicht. Kann jemand mir helfen danke.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

use strict;
use warnings;
use XML::Twig;   
use File::Find;

my $file ='\Users\ADMIN\Documents\probe';

my $FileResult = 'result.txt';
open( my $FhResult, '>', $FileResult )or die ("Unable to open file $FileResult\n$!");

find(\&wanted, $file);

sub wanted {
    print $FhResult  "Found it $File::Find::dir/$_\n" if /^[d or t]/i;
}


modedit Editiert von GwenDragon: Titel ergänzt
Last edited: 2015-04-22 10:09:13 +0200 (CEST)

View full thread File::Find - bestimmte Dateien in Verzeichnis finden