Opened by perlniete at 2009-02-09 01:09
User since
2003-08-04
5870 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5870 Artikel
ModeratorIn
Bei so etwas wie
sollte man immer hellhörig werden. Entweder möchtest du alle speziellen Zeichen dadrin escapen
oder du möchtest vorher irgendwie sicherstellen, dass du da keinen Schadcode (endloser regulärer Ausdruck etwa) ausführst.
Code: (dl
)
$sequence =~ /$regexp/ig
sollte man immer hellhörig werden. Entweder möchtest du alle speziellen Zeichen dadrin escapen
Code: (dl
)
$sequence =~ /\Q$regexp/ig
oder du möchtest vorher irgendwie sicherstellen, dass du da keinen Schadcode (endloser regulärer Ausdruck etwa) ausführst.
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