perl -wle'
$kurs = 49.90;
print $kurs*2'
99.8