#!/usr/bin/perl -C0

# (see -C in perlrun)

# [...]

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