print "\nBitte geben Sie Oes ein:\n";
chomp ($eing = <STDIN>);
my($kurs)= 13.7603;