Dateiliste auslesen

[Siechfred]

Hallo Ralph.

Folgende zwei Code-Ausschnitte illustrieren mein Problem:
[...]

Was missfällt dir an File::Find?

#!usr/bin/perl -w
use strict;
use warnings;
use File::Find;

my @files;
my $muster = '.*96961_B.dat';

find(&bedingung, "verzeichnis/mit/textdateien");

die gesuchten Dateien stehen in @files

und können weiterverarbeitet werden

sub bedingung {
  if ( $_ =~ /^$muster$/ ) {
    push(@files, $_);
  }
  return;
}

Siehe: http://www.perldoc.com/perl5.8.4/lib/File/Find.html

Freundschaft!
Siechfred