|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Bulat Ziganshin 2:5093/4.126 20 Mar 2002 15:48:44 To : Igor Paikin Subject : Regexp --------------------------------------------------------------------------------
Wednesday March 20 2002, Igor Paikin writes to All:
IP> $url=~ s/^(http\:\/\/)?(.*)$/http\:\/\/$2/igm;
IP> Вот это добавляется http:// если его нету. А как сделать то же самое,
IP> но чтобы добавлялось когда его нету и исходная строчка не пустая?
добавь в конец "if $url"
Bulat, mailto:bulatz-AT-fort.tatarstan.ru, ICQ: work 15872722, home 11849833
... Иногда для того, чтобы изменить свое восприятие мира,
... люди пытаются изменить сам мир
--- GoldED+/W32 1.1.2
* Origin: Сетевой фильтр на 5 базаров (2:5093/4.126)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/33403c98a167.html, оценка из 5, голосов 10
|