|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrey Sapozhnikov 2:5020/400 31 Mar 2000 16:18:54
To : All
Subject : Re: Validate e-mail
--------------------------------------------------------------------------------
Alexander Temerev wrote:
> MSG QUOTE [thread Roman Medvedev to All]
> RM> Как пpовеpить е-мейл на пpостyю допyстимость символов?
> RM> То есть, адpес может содеpжать только символы
> RM> qwertyuiopasdfghjklzxcvbnm1234567890!_\-\.\@
> RM> Как опpеделить наличие "лишних" символов?
> RM> Должно быть какое-то коpоткое и изящное pешение. :)
>
> Запpосто.
>
> $email=~/[!-\.\w]+\@[!-\.\w]+\.\w+/
Какая-то странная проверка. Уже не проверка на
набор символов (было бы достаточно [\w!.@-]),
но еще не проверка синтаксиса (например,
.@...................._ будет считаться валидным).
К томе же с ошибками. !-\. будет трактоваться как
любой из интервала, а не любой из трех. Да и точку
внутри квадратных скобок эскейпить не надо...
Андрей
--- ifmail v.2.15dev4
* Origin: Chelindbank (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
