|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Sergey Gernichenko 2:5079/49.18 30 Dec 2003 10:23:26 To : Alexey Matvienko Subject : Re: --------------------------------------------------------------------------------
В понедельник, 29 декабря 2003 года, в 16:57, ты писал(а) All:
AM> есть число '1234567890'
AM> можно ли как-нибудь regexp'ами из него получить '1,234,567,890'?
Так можно:
while (s/(\d)(\d{3})\b/$1,$2/){};
До свидания, *Alexey*
С уважением, *Sergey*.
... А сегодня хорошая погода
--- WinNT 5.1.2600-Service_Pack_1 i1586 Eng, AS Perl5.6.1, Borland C++ v5.02
* Origin: Жизнь прекрасна и удивительна: живу и удивляюсь (2:5079/49.18)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/34353ff0fdfa.html, оценка из 5, голосов 10
|