s/([a-z])([12])/ $1 . ($2 == 1 ? 2 : 1) /eig;