# Generate a random word
perl -le 'print map{(a..z)[rand 26]} 0..rand 10'