# 1 2 3 4 # 3456789 123456789 123456789 123456789 123456 ($n,$_)=@ARGV;split//;print chr(ord()+$n)for@_