my $num1 = 0.29; my $num2 = 50; my $num3 = $num1 * $num2; print "num3=$num3\n"; # is '14.5'