for (1 .. 26) { $str =~ tr/a-zA-Z/b-zaB-ZA/; print $str; } [download]
In reply to Re: Caesar Shift Solution by japhy in thread Caesar Shift Solution by diarmuid