my $string =~ s% +% %g; # ersetzt mehrere Blanks im String auf eines...