ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Michael Smirnov                      2:5020/400     14 Feb 2001  23:05:04
 To : Roman Terleev
 Subject : Re: функция
 -------------------------------------------------------------------------------- 
 

 Hello Roman,
 
 RT> Hарод, помогите с выявлением неправильно написанного. В общем есть
 RT> необходимость преобразования чисел "байт" в читабельный вид.
 RT> Hапример "1048576" как 1,000,000 байт. или "1073741824" как 1,000,000,000
 RT> байт.
 
 Процедура, вставляющая запятые (из Perl Cookbok, кстати):
 
 sub commify {
     my $text = reverse $_[0];
     $text =~ s/(\d\d\d)(?=\d)(?!\d*\.)/$1,/g;
     return scalar reverse $text;
 }
 
 Hу а остальную часть скрипта как-нибудь сам допиши, там пара строк
 осталась :)
 -- 
 Best regards,             
 Michael                
 Отправлено через сервер Talk.Ru - http://www.talk.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.Ru (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    функция   Roman Terleev   14 Feb 2001 16:26:51   фyнкция   Albert N. MICHEEV   14 Feb 2001 20:44:57   фyнкция   Roman Terleev   15 Feb 2001 12:11:36   Re: фyнкция   Artem Chuprina   15 Feb 2001 17:05:01   фyнкция   Albert N. MICHEEV   15 Feb 2001 21:58:54   Re: функция   Michael Smirnov   14 Feb 2001 23:05:04   Re: функция   Alexander Babanov   14 Feb 2001 12:05:40   функция   Fedor Krusenshtern   15 Feb 2001 10:24:57