Thread String Zeichenkontrolle
(10 answers)
Opened by Patrick at 2004-01-26 15:12
m~\d{2}_[a-z]+$~
? Das sucht nach allem, was mit 2 Ziffern beginnt, denen ein Unterstrich und dann mindestens ein bis beliebig viele kleine Buchstaben (außer Umlauten) folgen. Hast Du mal versucht, nur <*> zu globben? Heißt "ohne Endung" für Dich "der Dateiname enthält keinen Punkt"? Dann ist vielleicht m~[^.]~ das richtige für Dich... Edit: Quark, das matcht ja auf jeden Nichtpunkt. Also besser [tt]unless (m~\.~) oder halt [font=courier]if ($var !~ m~\.~) {...}[/tt]. Oder positiv: if (m~^[^.]*$~) {...}.[/font] Wenn Du wirklich "Ist eine Zahl am Anfang enthalten? oder ein Unterstrich an 3. Stelle?" übersetzt haben willst, lautet die Antwort: [tt]m~^\d|^.._~[/font] oder halt m~^\d~ or m~^.._~\n\n <!--EDIT|Crian|1075126652--> 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 |