#!perl -p
y/A-Z/N-ZA-M/;
y/a-z/n-za-m/;