Select Code to Download

#!/usr/bin/perl
use strict;
...

sub flip_char 
{$_= lc shift; tr/'ahbbmfnnjpdrvutwqgye'/'eyqgwtuvrdpjnnfmbbha'/; $_}

some text can be
flipped over using
this script

fdijcs siyf
buisn jano paddilt
aq uec fxaf awos

./umop-apisdn.pl < test.txt | ./umop-apisdn.pl