Your file is in an 8-bit encoding, yes? Make sure perl thinks so too, then use \x for the substitution.

#!/usr/bin/perl -C0

# (see -C in perlrun)

# [...]

y/\x91\x92\x97/omg/; # or some other three replacement chars
[download]