- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #3508 [639]
От : Konstantin Tokar 2:5020/400 09 мая 04, 16:39
Кому : abrasha shapirus 10 мая 04, 22:44
Тема : Re: Как получить дробную часть числа?
-------------------------------------------------------------------------------
From: Konstantin Tokar
abrasha shapirus wrote:
> ,
> 08 Май 04, Konstantin Tokar --> abrasha shapirus
>
> >> my $ch = 0.1;
> >> printf("%.2f", $ch - int($ch));
> >>
> >> и все будет как положено.
> KT> Проще уж будет split '.' применить, всё-таки форматирование долгая
> KT> операция. Хочется простой способ и без операции вычитание.
> man POSIX
> /modf
Вот спасибо! Это я и не нашёл самостоятельно, а именно то что надо.
--- ifmail v.2.15dev5.3
* Origin: Demos online service (2:5020/400)