Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: Общие вопросы > Правила ввода (Perl)


Автор: dafich 19.3.2003, 19:46
Правила ввода (Perl)

Подскажите как организовать запрет ввода: пробелов, символов типа @#$%^ и смесь латиницы с кирилицей?

if ($FORM{'test'}) {
$name = "$FORM{'test'}";
$name =~ confused.gif;
}

Автор: acp 19.3.2003, 20:41
Ну есть например такая штука, как регулярные выражения.
Например
Код
$Name =~ s/ //g;

Даст тебе то, что в $Name не будет пробелов.

Синтаксис примерный s - поиска
Цитата
s/<шаблон>/<на что заменять>/<модификаторы>


PS: Читай доки... Полно же их... Там всё хорошо описано...

Автор: HalkaR 19.3.2003, 22:52
Удалить ненужные символы можно
Код
$text =~ s/[@#$%^]//g;
А вот отличить кирилицу от латиницы боюсь не удастся. Нужно проверять код буквы.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)