in reply to
chomp(my $cypher = <STDIN>);
$cypher = lc($cypher);
$cypher =~ tr/a-z/n-za-m/;
print "ROT: $cypher\n";
The point of the OP's code is to apply all 26 possible shift widths.
Makeshifts last the longest.
I make decisions, and my brain carries them out
My brain makes the decisions, and I observe them (if I'm lucky)
I make some decisions, and my brain makes others
My spouse makes decisions and I and my brain carry them out
I wrote a program to relieve me and my brain from the burden of decision-making
The black-helicopter people project the decisions into my brain and then I do as ordered
Results (481 votes),