my %hash = map { chr(65+$_)=>chr(65+($_+13)%26),
		 chr(97+$_)=>chr(97+($_+13)%26)} 0..25;