15.5: Perl Code funktioniert nicht mehr