|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Rinat H. Sadretdinow 2:5020/400 29 May 2003 13:24:15 To : Ruslan Sulemanov Subject : Re: хелп -------------------------------------------------------------------------------- "Ruslan Sulemanov" <Ruslan.Sulemanov@p27.f1024.n4635.z2.fidonet.org> wrote in message news:1054205501@p27.f1024.n4635.z2.ftn... > $url="http://www.yahoo.com/c1///c2/c3//index.html"; > > Как yдалить все повторяющиеся /,тоесть привести в такой вид: > $url="http://www.yahoo.com/c1/c2/c3/index.html"; Что-то типа того: my $url = 'http://www.yahoo.com/c1///c2/c3//index.html'; $_ = $url; 1 while s/(?<!:)(\/)\1/$1/g; $url = $_; print $url; -- Пока! --- ifmail v.2.15dev5 * Origin: SYS3175 (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6577de6b39af.html, оценка из 5, голосов 10
|