perl -le 'print map{(a..z)[rand 26]} 0..rand 10' #### perl -le 'print map{(a..z,A..Z,0..9)[rand 62]} 0..7'