s/oh/Ohio/g into Perl.