|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Igor Gerdler 2:5020/400 20 Mar 2002 19:57:47
To : Andrey Sapozhnikov
Subject : Возражения
--------------------------------------------------------------------------------
Добрый день, уважаемый Андрей!
> > Верный вариант:
> > $url = 'http://'.$url if($url and $url !~ m|^http://|i);
>
> Если предположить, что $url defined и ne '0'...
Полностью с Вами согласен!
Hо, позвольте в свое оправдание указать на условия задачи. Переменная $url
определена и не должна быть равна 0 (т.к. адрес http://0 не очень похож на
рабочий).
Если же переменная $url неопределена, то ошибка при выполнении программы
будет такой же, как и в варианте $url =~ s|^(?!http://)(.+)$|http://$1|gim;
Всего доброго!
Игорь Гердлер
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
