echo 123412341234 | perl -pe '$s=time;s/(.)/srand $s;rand for 1..$1;chr(ord("a")+rand 26)/ge'