|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : alexander smishlajev 2:5100/14.8 26 Dec 2000 12:00:28 To : nsv@rv.lg.ua Subject : Как отделить разряды числа?? --------------------------------------------------------------------------------
saturday december 23 2000, nsv@rv.lg.ua writes to All:
n> Hужно проделать такую вещь:
n> Вводим чтото вроде 1234567890, а получаем 1'234'567'890.00
n> Hатолкните хотябы на мысль, но помниться мне тут вроде уже
n> решался подобный вопрос.
для целых чисел: scalar reverse (join (',', reverse ($line) =~ m/\d{1,3}/g));
(взято с http://www.nitek.ru/~igor/perl/convert.html)
желаю здравствовать,
alex.
ps. Sly, включил бы уже в faq, что ли... раз в три месяца обязательно
кто-нибудь спросит.
--- GoldED 3.0.1
* Origin: Бывалоча, пpеpвешь pаботy мысли... (FidoNet 2:5100/14.8)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/224353a487a76.html, оценка из 5, голосов 10
|