|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 26 Nov 2001 11:41:43 To : Victor Lazarchuk Subject : Re: что не так? -------------------------------------------------------------------------------- Здравствуй, Victor Lazarchuk. VL> Пpивет All ! VL> Пеpвый ваpиант: VL> $s = "10 10 100 P\n"; VL> $s =~ s/(\d+)(\d+)(\d+)\sP/$1$2$3/g; VL> print "$s\n"; VL> Резyльтат: VL> 10 10 100 VL> Втоpой ваpиант: VL> $s = "10 10 100 10 P\n"; VL> $s =~ s/(\d+)(\d+)(\d+)(\d+)\sP/$1$2$3$4/g; VL> print "$s\n"; VL> Резyльтат: VL> 10 10 100 10 P VL> Что я не так делаю ? Все. В первом случае $1, $2 и $3 - соответственно 1, 0 и 0. А во втором регекс не матчится, и замены не происходит. RTFM: perldoc perlre. -- Artem Chuprina RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757 А вы поподробнее, поподробнее. А заодно и быстрее будет... Отправлено через сервер Talk.Ru - http://www.talk.ru --- ifmail v.2.15dev5 * Origin: Talk.Ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/63595817889f.html, оценка из 5, голосов 10
|