$ perl -lwe '
use strict;
my $password = "abcdefg";
$password =~ y/a-z/n-za-n/;
print $password;
'
nopqrst