The OpenNET Project / Index page

[ новости/++ | форум | wiki | теги ]

Как используя Perl разбить число на триады
$num = 100000000000000; 
$num =~ s/(\d{1,3}(?=(?:\d\d\d)+(?!\d)))/$1,/g;
 
22.01.2003 , Автор: gr
Ключи: loop, perl / Лицензия: CC-BY
Раздел:    Корень / Программисту и web-разработчику / Perl / Полезные подпрограммы на Perl / Работа с сетью и IP адресами на Perl

Ваш комментарий
Имя:         
E-Mail:      
Заголовок:
Текст:



  Закладки на сайте
  Проследить за страницей
Created 1996-2017 by Maxim Chirkov  
ДобавитьРекламаВебмастеруГИД  
Hosting by Ihor