|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrei Protasovitski 2:5020/400 21 Nov 2002 00:45:28
To : Sergey Ermakov
Subject : Re: Странный вопрос
--------------------------------------------------------------------------------
Доброго здоровья!
"Sergey Ermakov" <Sergey.Ermakov@f3123.n5020.z2.fidonet.org>
сообщил/сообщила в новостях следующее:
news:1037740544@f3123.n5020.z2.ftn...
>
> [Понедельник Hоябpь 18 2002] Andrei Protasovitski и Sergey
Ermakov вели
> беседу
>
> >> @letters=split($string); delete $letters[5];
> AP> По-моему, нет. А так, кажется, можно:
> AP> $string =~ s/(.{4})(.)(.*)/\1\3/;
>
> А какова логика в скобках, цифрах \1\3?.. =(
> Я бы, будь моя воля, сделал просто s/.{4}//; ?..
>
Логичней, конечно же, так:
$string =~ s/(.{4}).(.*)/\1\2/;
Твой же вариант удалит первые четыре символа, а не пятый.
--
Андрей.
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.Mail.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
