Shell Programming and Scripting

AAA
BBB
CCC
DDD

abc|AAA|AAAabcbcs|fnwufnq
bca|nwruqf|AAA|fwfwwefwef
fmimwe|BBB|fnqwufw|wufbqw
wcdbi|CCC|wefnwin|wfwwf
DDD|wabvfav|wqef|fwbwqfwfe

AAA 2
BBB 1
CCC 1
DDD 1

awk '{ if(NR==FNR) { arr1[FNR]=$0;count1++;next }
          if(NR!=FNR) { count=0
                             for(i=1;i<=count;i++) { if (arr1[i] ~ $0)
                                                               { count ++ }
                                                           }
                             print $0,count
                           }
        } file2.txt file1.txt

awk 'NR==FNR{ arr[count]=$0;count++ }
       NR!=FNR{ for(i=0;i<count;i++)
                     { 
                       if( index($0,arr[i])!=0 ) { arr_count[i]++ }
                      }
                    }
       END{ for(i=0;i<count;I++)
               {
                 print arr[i],arrcount[i]
               }
             }' file1.txt file2.txt

awk 'NR==FNR{C[$1]=0; next}{for (i=1; i<=NF; i++) if ($i in C) C[$i]++} END{for(i in C) print i, C[i]}' file1 FS=\| file2

awk 'NR==FNR {for (i=1; i<=NF; i++) C[$i]++; next} $1 in C{print $1, C[$1]}' FS=\| file2 file1

tr -s '|' '\n' < file2 | grep -xFf file1 - | sort | uniq -c

grep -xFf file1 <(tr -s '|' '\n' < file2) | sort | uniq -c

awk 'NR == FNR {a[$1]; next} {for(x in a) {if($0 ~ "(^||)" x "(||$)") {a[x]++; next}}} END {for(x in a) print x, a[x]}' file1 file2

awk 'NR==FNR{a[$1]=$1;next} {for(i=1;i<=NF;i++){if($i == a[$i]){v[$i]++}}} END{for(l in v){print l OFS v[l]}}' file FS="|" file2

AAA 2
BBB 1
CCC 1
DDD 1

AAA
 
BBB
CCC
123
A12
32B
Z H4
M H4