my $number = $base * (10**$power);
$hto_visk0 = sprintf("%.${power}f", $hto_visk0);