Opened by BrownWolf at 2003-09-20 20:34
User since
2003-08-04
5866 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5866 Artikel
ModeratorIn
[quote=BrownWolf,21.09.2003, 22:38]Vielleicht weil du kein /g hinten hast ? Oder wegen dem ^ für Anfang ?[/quote]
Das Dach vorn bedeutet Zeilenanfang. Wenn ich auf den matche, nützt mir g nix, da der Zeilenanfang (im Normalfall) nur einmal vorkommt.
Zum ^ nochmal in abwandlung obiges Programm:
Mit der Ausgabe
Das Dach vorn bedeutet Zeilenanfang. Wenn ich auf den matche, nützt mir g nix, da der Zeilenanfang (im Normalfall) nur einmal vorkommt.
Zum ^ nochmal in abwandlung obiges Programm:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
{
my $text = "BrownWolf BrownWolf BrownWolf BrownWolf";
my @fang = $text =~ s~^(Brown)Wolf~~;
{local $"=', '; print "s: @fang\n"}
}
{
my $text = "BrownWolf BrownWolf BrownWolf BrownWolf";
my @fang = $text =~ m~^(Brown)Wolf~;
{local $"=', '; print "m: @fang\n"}
}Mit der Ausgabe
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