UNIX for Beginners Questions & Answers

blabla_1 A,B,C,C
blabla_2 A,E,G
blabla_3 R,Q,A,B,C,R,Q

blabla_1 3
blabla_2 3
blabla_3 5

gawk -F '\' '
{
   VAR=0

   a=split($2,b,",")
   
   for(i=1; i<=a; i++){
      if(!c[b[i]]++){
         VAR+=1
      }
   }
   
   print $1 "\t" VAR
}' input.tab

blabla_1 3
blabla_2 2
blabla_3 2

gawk '
{	VAR=0
	split($2,b,",")
	for(i in b)
		if(!(b[i] in s)) {
			VAR++
			s[b[i]]
		}
	print $1 "\t" VAR
	for(i in s)
		delete s[i]
}' input.tab

	for(i in s)
		delete s[i]

	delete s

awk -F"[ ,]" '
        {for (i=2; i<=NF; i++) {if (!T[$i]++) C++}
         print $1, C
         C = 0
         split (_,T)
        }
' file
blabla_1 3
blabla_2 3
blabla_3 5

awk '{split(x,C); n=split($2,F,/,/); for(i in F) if(C[F[i]]++) n--; print $1, n}' file

awk '{split(x,C); n=split($2,F,/,/); for(i in F) n-=(C[F[i]]++>0); $2=n}1' file