Shell Programming and Scripting

bash-3.2$ awk 'NR==FNR{
>                 a[$1]=$0
>         }
> 
> NR!=FNR{
>         n=split($1,b,",");
>         for(i=1;i<=n;i++)
>                 {       if(a[b[i]])
>                                 {
>                                         print a[b[i]]" "$2" "$3
>                                 }
>                 }
>         }' saragenename4 TTDtargets2.txt >sararoughttddrugs5
bash-3.2$

awk '
NR==FNR&&NF>1{
		x=$1;
		for(i=2;i<NF;i++)
				{
					x=substr(x,1)":"substr($i,1);
				};
		a[x]=$NF
	}
(NR!=FNR&&NF>1){
		x=$1;
		for(i=2;i<NF-2;i++)
				{
					x=substr(x,1)":"substr($i,1);
				};
		if(a[x])
				{
					n=split(a[x],b,":");
					if(n==1)
						{
							a[x]=substr(a[x],1)":"substr($NF-2,1)":"substr($NF-1,1)":"substr($NF,1);
						}
					else
						{
							f1=substr(b[2],1)","substr($NF-2,1);
							f2=substr(b[3],1)","substr($NF-1,1);
							f3=substr(b[4],1)","substr($NF,1);
							a[x]=substr(b[1],1)":"substr(f1,1)":"substr(f2,1)":"substr(f3,1);
						}
				}
	}END{
		while(getline < "file2")
			{
				x=$1;
				for(i=2;i<NF;i++)
					{
						x=substr(x,1)":"substr($i,1);
					};
				if(a[x])
					{
						n1=split(a[x],b,":");
						n2=split(x,c,":");
						if(n1>1)
							{
								for(j=1;j<=n2;j++)
									{
										printf c[j]" ";
									};
								print b[1]" "b[2]" "b[3]" "b[4];
							}
					}
			}
	}
' file2 file1

Mani Grover z34 1,3,4 2,4,5 3,5,6
Harsh Grover z44 4 5 6