|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Eugeniy Muran' 2:4623/13 28 Jul 2000 09:45:35 To : Denis Moujjoukhin Subject : трабла -------------------------------------------------------------------------------- і Позволю себе напомнить, что в Четверг 27 Июля 2000 года, в 23:43 і Denis Moujjoukhin писал к All о "трабла" АДДДДДДДД<<< DM> Хелп, плиз: есть строка типа "http://dded.d.d.d/dd/d/ddd/dd.html" урл DM> короче. помогите составить шаблон, чтоб только хост оставался, (если DM> есть перед хостом имя и пароль, на случай ftp, тоже DM> отбросить...) $d="http://dd.d.d/dd/dd.html" $d=~/\/\/(\S+)(?=\/)/; в DM> $1 будет dd.d.d/dd а надо только хост... хелп. Такое пойдет? >=== Здесь родился url.pl! :) === #!perl -w $url_all="http://dded.d.d.d/dd/d/ddd/dd.html"; ($a, $b, $url)=split(/\//,$url_all); print $url; >=== Здесь скончался url.pl! :( === ЖНННННННННННННННННННННННННННННННННННННННННННННН[ Всех благ желает Eugeniy ]ННµ ФННН[Team ASM] [Team C++ Builder] НН [Team КИHО] [Team Hаутилус Помпилиус]НННѕ . Человечество стоит лицом к краю пропасти, а прогрес ведет его впред! --- * Origin: JackSoft [ ICQ: 44436588, e-mail: jacksoft@chat.ru ] (2:4623/13) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/181239811e5c.html, оценка из 5, голосов 10
|