my $lange_zahl = 1.45548765;
my $kurze_zahl = sprintf "%.2f", $lange_zahl;
print $kurze_zahl;