Opened by elfe at 2005-09-26 11:24
User since
2005-09-26
6 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-09-26
6 Artikel
BenutzerIn
Hey danke für eure Ideen und Hilfe - ich habe mich erst seit kurzer Zeit mit Perl beschäftigt und das Problem diese Überprüfung zu ändern ist vielleicht einfach (für euch Experten) aber für mich bisher eine Herausforderung.
Könnte dieses also richtig sein?
Könnte dieses also richtig sein?
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
elsif ($action eq 'add_account'){
# START - Nur Anmelder mit einer passenden ID mit 01 am Ende sind zur Anmeldung berechtigt
if ( $ID =~ /^\d{4,6}01$/ ){
&Add_Account;
}
else {
&Show_Error('Your ID is not correct.<br>Ihre ID ist nicht richtig.');
}
# ENDE - Nur Anmelder mit einer ID aus ID.txt sind zur Anmeldung berechtigt
}