$answer = $pcr * $cell_size * 8;
$len1 = length($answer);

##</code><code>##

$answer = sprintf "%.0f", $answer;
$len1 = length($answer);

##</code><code>##

if ($answer >= 1000 && $answer < 1000000) {
   $answer = int($answer/1000) . " Kb/s";
} else ...

##</code><code>##

if ($answer >= 999.5 && $answer < 999500) {
   $answer = int($answer/1000 + .5) . " Kb/s";
} else ...