$text =~ s|\/\*[^\*]*\*\/||;