perl -M5';$x=join"",sort{rand()<rand}a..z'
     -pe 'eval"tr/0-9/$x/"' input.txt