#!perl -p s/[A-Z]/ \L$&/g,s/ i/i/..9