$keys = join '|', map "\Q$_\E", keys %sub_hash;
$keys_REx = qr/$keys/;

$string =~ s/($keys_REx)/$sub_hash{$1}/g;