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