my $number = $base * (10**$power);
$p = sprintf("%u", $power);
$number = sprintf("%.20f", $number);