Glob-Operator - #54271 (Allgemeines zu Perl)

Crian

2005-04-28 19:00

User since
2003-08-04
5870 Artikel
ModeratorIn

Im Prinzip macht es das gleiche, was auch die Unix-Shell machen würde. Wenn Du da ls *.pl eingibst, listet es halt alle Dateien auf, die auf .pl enden. glob gibt diese halt zurück (in ein Array) oder gibt im skalaren Kontext immer den nächsten aus der Liste zurück, so dass Du die Dinger in einer Schleife verarbeiten kannst.

Code: (dl )

my @files = glob("*.pl");

Code: (dl )

1
2
3

while (my $file = glob("*.pl")) {
    print "Datei [$file]\n";
}

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite