my $re = join '|', map { quotemeta $_ } keys %revHash;
$_[1] =~ s/($re)/$revHash{$1}/g;