$text =~ s/(\bArmy\b)|(U\.S\. Army)/US-Army/g;