|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Arkhipov Dmitriy 2:5020/400 28 Oct 2001 17:46:05 To : All Subject : А-Яа-я -------------------------------------------------------------------------------- День добрый! Есть код: if(not($Text=~/^[A-Za-zА-Яа-я]+$/)) { print 'Строка содержит недопустимые символы'; } По сути он должен проверять содержит ли строка только буквы латинского и русского алфавита и если это не так выдавать предупреждающее сообщение. Hо он выдаёт это сообщение даже если $Text содержит русские буквы. В чём дело? С уважением, Архипов Дмитрий. -- Отправлено через сервер Talk.Ru - http://www.talk.ru --- ifmail v.2.15dev5 * Origin: State Marine Technical University of St. Petersburg - w (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/21484a30023d.html, оценка из 5, голосов 10
|