$ perl $content_line_input = "!Z"; if ( $content_line_input =~ /!Z<\/VT>/gi ) { $content_line_input = "dasisteintest"; print "testtest\n\n"; } testtest