Return to Revisions

printf '%s\n' {D,H,S,C}$'\t'{{2..10},J,K,Q,A} | shuf | head -n5 |
    awk '{ c[$2]++; printf("%s\t", gensub("\t"," ","")) }
         END{ print ""; for(i in c){
           if( c[i]==2 ){ print "PAIR:  " i; cp++ }  
           if( c[i]==3 ){ print "THREE: " i }
           if( c[i]==4 ){ print "FOUR:  " i }
           if( cp==2  ) { print "TWO PAIR" }
           if( cp&&ct ) { print "FULL HOUSE" }}}'

Example output:

D 7 H 7 C 8 S 8 D 8 
PAIR:  7
THREE: 8
FULL HOUSE