RosettaCodeData/Task/Rot-13/Perl-6/rot-13.pl6
2018-06-22 20:57:24 +00:00

1 line
80 B
Raku

print slurp.trans: ['A'..'Z','a'..'z'] => ['N'..'Z','A'..'M','n'..'z','a'..'m']