perl -e "print sprintf('%03b',$_).' '.int(rand()+0.5).$/ for 0..7"