my $str = 'das ist das haus und das ist aus';
my $n_element = 2;
my $titel = 'das';
my $titel_ersetzen = 'was anderes';
$str =~ s/($titel)/--$n_element ? $1 : $titel_ersetzen/ge;
print $str;