my $suche = "__TOC__";
my $ersetze = "__FORCETOC__";
$content =~ s/$suche/$ersetze/g;