perlの計算について、なぜ下記は4021ではなく4020が出力されるのでしょうか？

実際のスクリプトは長く$timesが色々な値をとるため、不用意に$max_getに整数以外を出力させないようにintを使っているのですが、この書き方は正しくないのでしょうか？
$times = 0.005;
$min_get = 4000;
$max_get = int( $min_get * (1 + $times) + 1 );
print $max_get;