Perl – Bestimmte Dateitypen aus Verzeichnis auslesen
Mitunter kommt es vor das man bestimmte Dateien aus einem Verzeichnis auslesen möchte. Ein Fall für grep.
Verschiedene Beispiele
In diesem Beispiel sollen alle htm und html Dateien aus einem Verzeichnis in ein Array gelesen werden.
opendir(DIR,"$pfad") or die "Kann $pfad nicht oeffnen $!n";
@files = grep {/^.*(\.htm$|^.*\.html$)/i} readdir DIR;
closedir(DIR);
Möchte man nur alle gif Dateien eines Verzeichnisses auslesen geht das per
opendir(DIR,"$pfad") or die "Kann $pfad nicht oeffnen $!n";
@files = grep {/^.*(\.gif$)/i} readdir DIR;
closedir(DIR);
Will man einfach nur alle Dateien auslesen ändert man obigen Code so:
opendir(DIR,"$pfad") or die "Kann $pfad nicht oeffnen $!n";
@files = grep {!/^(.|..)$/} readdir DIR;
closedir(DIR);
Das Array @files kann man dann in einer Schleife nutzen um die Dateien auszugeben.
Oder aber man gibt die gefundenen Verzeichnisinhalte sofort aus
opendir(DIR,"$pfad");
for $dateien (grep {!/^(.|..)$/} readdir DIR) {
print" $dateien<br>n";
}
closedir(DIR);
Weitere Beiträge
Virtuelles Büro in Stuttgart Innenstadt: Flexibel, professionell und kosteneffizient
Ein virtuelles Büro in der Stuttgart Innenstadt bietet Ihnen die ideale Gelegenheit, Ihre geschäftliche Präsenz zu stärken – ohne hohe Fixkosten. Die wirtschaftsstarke Hauptstadt Baden-Württembergs ist ein Hotspot für Innovation und Unternehmertum. Eine Geschäftsadresse in dieser zentralen Lage signalisiert Professionalität und schafft Vertrauen bei Kunden und Geschäftspartnern. Gleichzeitig profitieren Sie von der hervorragenden Infrastruktur und […]
Letzter Tag: Amazon Black Friday Deals für Technik-Liebhaber
Die Black Friday Woche bei Amazon endet heute, und Technik-Liebhaber sollten jetzt zugreifen. Für Betreiber von Webseiten oder Kreative gibt es viele spannende Angebote. Von leistungsstarken Laptops bis hin zu Software-Lizenzen finden Sie heute zahlreiche reduzierte Produkte. Auch Zubehör wie kabellose Tastaturen, externe Festplatten oder USB-Hubs sind oft günstiger erhältlich.
Meta Quest 3: Entdecken Sie das aktuelle VR-Headset
Die Meta Quest 3 ist das aktuelle Mixed-Reality-Headset von Meta, das innovative Technologien vereint, um ein einzigartiges VR-Erlebnis zu bieten. Diese VR-Brille stellt sowohl für Gelegenheitsnutzer als auch für Technikenthusiasten eine aufregende Möglichkeit dar, die Grenzen zwischen der physischen und digitalen Welt zu erkunden. Eine echte Alternative zur Apple Vison Pro. Wer etwas günstiger in […]
Amazon Prime Deal Days: Günstige Hardware-Angebote für Technikfans
Amazon bietet während der Prime Deal Days besonders günstige Hardware an. Das beliebte Shopping-Event läuft vom 8. bis 9. Oktober. Prime-Mitglieder dürfen sich auf exklusive Rabatte und Angebote freuen. Besonders Technikfans kommen in diesen zwei Tagen voll auf ihre Kosten.
Kommentare
Dr. Harald Kollmann 28. Januar 2022 um 20:00
Nettes Beispiel!
Eine kleine Anmerkung: die o.G: Beispiele blenden alle Dateien aus, deren Name ein oder zwei Zeichen lang ist.
um nur . und .. aus zu blenden müsste man . ( irgendein Zeichen ) durch vorangestellten \ zu \. = Punkt ersetzen: grep {!/^(\.|\.\.)$/}
grep { !/^\.{1,2}$/} oder grep {!/^[.]{1,2}$/} oder ähnlich tut es auch.