ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Vadim Tzirulnicov                    2:5020/40.102  09 Aug 2003  00:09:07
 To : All
 Subject : URL Parser
 -------------------------------------------------------------------------------- 
 

 _*ЯЯЯЯЯ*_        ИНННННННННННННННДДДДДДДДДДДДДДДДДъъъъъ ъ ъ ъ
 
 Помогите вытащить из URL регулярным выражением следующие части:
 
 1. Доменное имя
 2. Порт (если присутствует)
 3. Путь к файлу на сервере (если присутствует)
 
 Hадумал следующее:
 
                if ($text=~/(\w+[\.\w{2,}]?)[\:(\d{2,})]?[\/(^\:+)]?/){
                   $port=$2;
                   $host=$1;
                   $url=$3;
                }
                else {
                   $port=80;
                }
 Hо не фурычит, гад ! :)
 
 Как правильно ?
 
 Должно правильно обрабатывать следующие строки:
 
 localhost
 
 abc.com:324/?var=name ($1="abc.com", $2="324", $3="?var=name")
 
                ъ ъъъДН» Hу я вроде все сказал... Пока, _*All*_ !
                       ИНННННННННННННННДДДДДДДДДДДДДДДДДъъъъъ ъ ъ ъ
 ... Моя совесть настолько чиста и прозрачна, что её почти совсем на видно.
 --- GoldEd 3.00.Beta5+
  * Origin: Windows - вирус с удобным интерфейсом. (2:5020/40.102)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    URL Parser   Vadim Tzirulnicov   09 Aug 2003 00:09:07   Re: URL Parser   Artem Chuprina   11 Aug 2003 12:39:41   Re: URL Parser   Vladimir Podgorny   11 Aug 2003 12:31:00