Opened by Arasiel at 2003-11-25 14:09
User since
2003-08-04
5873 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5873 Artikel
ModeratorIn
Was ich meinte war folgendes, was allerdings nicht so klappt, wie ich es erwartet hatte:
Ich hatte erwartet, dass die Printausgabe kommen würde, denn ich habe es irgendwo so gelesen. Ev. war das aber im Buch "Reguläre Ausdrücke" von Jeffrey E. F. Friedl bezogen auf eine andere Geschmacksrichtung von Regulären Ausdrücken.
Jedenfalls sind die Backslashes da oben überflüssig... aber anscheinend auch nicht falsch - interessant.
Code: (dl
)
1
2
3
4
5
use strict;
my $text = 'abc\def';
print "'$text' enthält Umlaut!" if $text =~ m~[\ä\ö\ü\ß\Ä\Ö\Ü]~;
Ich hatte erwartet, dass die Printausgabe kommen würde, denn ich habe es irgendwo so gelesen. Ev. war das aber im Buch "Reguläre Ausdrücke" von Jeffrey E. F. Friedl bezogen auf eine andere Geschmacksrichtung von Regulären Ausdrücken.
Jedenfalls sind die Backslashes da oben überflüssig... aber anscheinend auch nicht falsch - interessant.
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
use strict; use warnings; Link zu meiner Perlseite