#!/usr/bin/perl

use strict;
use warnings;
use diagnostics;
use File::Find::Rule;

my @files = File::Find::Rule->file()
                 ->name('*.html')
                 ->in( '/home/usr/perl/html.files' );
foreach my $file(@files) {
        print $file, "\n";
}
[download]

hello dear Khen1950fx

many many thanks for the quick reply: i am very happy to hear from you! i changed the paths also to absolut -but i did not have the good results here....

>
i found out that i made some mistakes while talking bout the html-files: Note: there are more than 20 000 Html files in the directory that is called htmlfiles Note i renamed it to htmlfiles - instead of html.files but the files itself are all named like the following sheme:

einzelergebnis1...
einzelergebnis2...
einzelergebnis3a...
einzelergebnis3b...
einzelergebnis3d...

and so forth...
so my question is: how is the convention to call it here in this line:

->name('*.einzel')

how to name this line

-> name('*.einzel')

or -> name('einzel*.')

I ask this question - since i guess that perl does not find the files - since i have the wrong naming convention...

Here the code that might run for you - as you have put some files into the folder - that are named with html*

#!/usr/bin/perl

use strict;
use warnings;
use diagnostics;
use File::Find::Rule;

my @files = File::Find::Rule->file()
                 ->name('*.einzel')
                 ->in( '/home/usr/htmlfiles' );
foreach my $file(@files) {
        print $file, "\n";
}
[download]

i love to hear from you!
Btw - if i have to clear my question and ask more precisely - then let me know!

regards
perlbeginner1

Use  ->name('einzelergebnis*'). Like so:

#!/usr/bin/perl

use strict;
use warnings;
use diagnostics;
use File::Find::Rule;

my @files = File::Find::Rule->file()
                 ->name('einzelergebnis*')
                 ->in( '/home/usr/htmlfiles' );
foreach my $file(@files) {
        print $file, "\n";
}
[download]

suse-linux:/usr/perl # ls -al /usr/perl/htmlfiles/
[download]