my $satz_bau = 0; my $string  = 'dieser satz soll bearbeitet werden.'; if($satz_bau == 0){          $satz_bau =~ s/<.+?>//gi; }else{          $satz_bau =~ s//$1/gi; } print $satz_bau;