|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Averbuh 2:4625/23.7 06 Jul 2000 21:23:00 To : admin@aquilon.ru Subject : Простите чайника, но оччень нужен хелп. --------------------------------------------------------------------------------
ДДВ " ВДї Дї
і АДЩ ДБ
Hello, admin@aquilon.ru! Как поживает твой hерц?
Четверг Июль 06 2000 10:23, admin@aquilon.ru wrote to All:
a> Замучился я искать в доках - есть ли в перле функция округления, типа
a> аналога round в фоксе. Или еще чего-нть подобное.
a> Заранее благодарен.
Я искал, но не нашел. Пришлось соорудить ее самостоятельно.
=== Cut ===
sub round{
my $m; # private переменная но не local !
$m = $_[0];
$vvv=$m-int($m);
return int($m)+1 if $vvv >= 0.5;
return int($m);
}
=== Cut ===
С уважением, Alexander
Так, идите мыть руки, admin@aquilon.ru!
mailto: alexaver@chat.ru http://alhome.virtualave.net
--- GoldED 2.50+
* Origin: Haettest du mich geliebt! (2:4625/23.7)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/27933965072c.html, оценка из 5, голосов 10
|