Betriebsblindheit oder ...?

[rolfrost]

moin Helmut,

ich mach das mit grep so...

Jow, ich auch ;-)

@htmldateien = ();
opendir(DIR,"$pfad");
for $dateien (grep {/(.htm|.html)/} readdir DIR) {

ich darf das mal verbessern:
my @files = grep {/^.*(.htm$|^.*.html$)/i} readdir DIR;

=> also den punkt maskieren und die Anker nicht vergessen, das macht die regex sicherer (/i => insensitive case, falls gewünscht).

at Christoph: Schau Dir mal File::Find und File::Basename an das ist auch ganz interessant.

Viele Grüße, Rolf