Opened by skontox at 2003-08-20 15:18
User since
2003-08-11
265 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-11
265 Artikel
BenutzerIn
@SirLant, ich schreibe dir an:
%&§$"@&(//&%.$%&$%
und die hier erhälst Du nicht:
SirLant@forum.perl-cummunity.de
Wenn Du Email::Valid solltest Du alle Alphanumerischen Zeichen, Punkte und Bindestriche zulassen, gefolgt von einem @, asnschließend wieder Alphanumerische Zeichen, Punkte und Bindestriche.
Du könntest nach dem letzten Punkt, nur Buchstaben erlauben und deren Anzahl begrenzen.
%&§$"@&(//&%.$%&$%
und die hier erhälst Du nicht:
SirLant@forum.perl-cummunity.de
Wenn Du Email::Valid solltest Du alle Alphanumerischen Zeichen, Punkte und Bindestriche zulassen, gefolgt von einem @, asnschließend wieder Alphanumerische Zeichen, Punkte und Bindestriche.
Du könntest nach dem letzten Punkt, nur Buchstaben erlauben und deren Anzahl begrenzen.
http://hamburg.pm.org
jeden 2. mittwoch im monat
--
#!/usr/bin/perl -w
$l=join('',map chr,(116,110,105,114,112))if$^T;
!!$$?@_=qw(Jhfg Aabgure Prey Hnpxre):$l=1;
for(@_){eval reverse($l)."'"._(_(_($_))).' \''}
sub _{$_=~y+a-z+n-za-m+and pop}
jeden 2. mittwoch im monat
--
#!/usr/bin/perl -w
$l=join('',map chr,(116,110,105,114,112))if$^T;
!!$$?@_=qw(Jhfg Aabgure Prey Hnpxre):$l=1;
for(@_){eval reverse($l)."'"._(_(_($_))).' \''}
sub _{$_=~y+a-z+n-za-m+and pop}