floor関数 - 小数部を切り下げる
小数点を切り下げるには、POSIXモジュールのfloor関数を使用します。
use POSIX 'floor'; my $ret = floor $num;
サンプル
小数点を切り下げるサンプルです。
use strict; use warnings; use POSIX 'floor'; my $num1 = 1.5; my $num2 = -1.5; print "(2)小数点を切り下げる。\n"; my $num1_floor = floor $num1; my $num2_floor = floor $num2; print "$num1の切り下げ : $num1_floor\n"; print "$num2の切り下げ : $num2_floor\n";