$text =~ s/(national security adviser )?(dr. |doctor )?(condoleeza )?rice/condoleezarice/ig; #### ((dr. |doctor )|(condoleeza ))rice