Hallo,
[..]
if ($dateiname !~ m/.jpg/i || $dateiname !~ m/.gif/i)
[..]Besser ist
if ($dateiname !~ m/.jpg$/i || $dateiname !~ m/.gif$/i),
weil so überprüft wird, ob der Dateiname auf .jpg oder .gif _endet_; sonst geht z.B. auch blablubb.jpg.exe durch.Gruß Markus
»»
:-)
genau,
aber wenn man auf der schnelle antwortet, vergiesst man
schon mal wichtige details...
Und da sich viele nicht mir Regulären Ausdrücken Auskennen, hier ne kleine Erklärung:
zueinem steht ein \ vor dem Punkt,der Punktist ein Sonderzeichen bei Reg.Ausdrücken und ist so ne art joker, also für jedes Zeichen gültig (ausser Zeilenumbruch "\n", giebnt aber auch dafür ne Ausnahmeregel)...
Das $ Zeichen welches der Markus zugefügt hat, ist das sonderzeichen für string/Zeilen Ende also xxxxx.jpgENDE, das Bedeutet das nur .jpg amEnde stehen darf und nicht mittendrinn, das Gegenstück ist ^, z.B. ^bild findet: bilder.., bildgalery.. aber nicht meinbild.jpg
Das mal so kurz erklärt, als Perl progger sollte man sich die regulären Ausdrücke mal richtig zur Brust nehmen, denn das ist
der Zauberstab bei der Perlprogrammierung
so long, Micha