YourAdmin
Junior Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Еще проблема )
Нужно проверить логин. Для начала:
Можно использовать:
1) Только латинские буквы
2) Цифры
3) Пробел и символ "_"
Далее хотелось бы модифицировать чтобы можно было использовать либо только латинские буквы + (2) + (3), либо только кириллицу + (2) + (3).
Не ожидал, что такой вопрос поставит на лопатки.
пробовал вот так
if ($a_login !~ /^[a-zA-Z0-9_\s]/) {
print "Content-type:text/html\n\n";
print "Болт";
exit;
}
и много раз пробовал редактировать, не помогло. Допустим, на "asdfasdf" - не ругается, на "йцукыва" - ругается, на - "sdfфаввыап" - не ругается.
Попробовал выдрать код из IB 2.1.9, также не помогло.
$_ = $a_login;
if ((m/\b[_]/) || (m/_{2,}/) || (m/[_]\b/)) {
print "Content-type:text/html\n\n";
print "Болт";
exit;
}
unless (/^[\w\d\xB3\xE0-\xFF\xA3\xC0-\xDF\xA8\xC0-\xDF\xB8\xE0-\xFF\xF0\x80-\x9F\xF1\xA0-\xAF\xE0-\xEF\xA1\xB0-\xCF\xF1\xD0-\xEF\x80-\x9F\xA0-\xAF\xE0-\xEF\xDD\x80-\xDF\xDE\xE0-\xFE\xDF]+$/){
print "Content-type:text/html\n\n";
print "Болт";
exit;
}
|
Всего записей: 156 | Зарегистр. 08-12-2001 | Отправлено: 16:08 06-03-2008 | Исправлено: YourAdmin, 16:12 06-03-2008 |
|
