plaintext: abcdef ciphertext: nopqrs #### tr/A-Z/N-ZA-M/; #### # 1 2 3 4 # 3456789 123456789 123456789 123456789 123456 ($n,$_)=@ARGV;split//;print chr(ord()+$n)for@_