my $string =~ s%^\s+|\s+$%%g; # was aber langsamer ist