# ersetze Vorkommen von TEXT durch ' TEXT ' $content =~ s#]+>([^<]+?)# $1 #sg;