perl -e'$|=1;{print+(int rand 9)%2?"wub ":"wooo ";select$u,$u,$u,.1;redo}'