$var =~ tr [a-mn-z] 
           [n-za-m];