Shell Programming and Scripting

dirs=(A,B,C,D,E);
files=(file1.txt);

for file in "${files[@]}";
do
    v=$(awk '{print $1,$2}' ${dirs[1]}/$file)
    for dir in "${dirs[@]}";
    do
        v="$v $(awk '{ print $3 }' $dir/$file)"
    done
    echo "$v" >> test.txt
done

awk '{print $1,$2; while (getline) {print $3} }' `find A B C D E -type f -name "file1.txt" -print`| sed -e :a -e '{ N; s/\n/ /g;ta }'

1 1 20 30 40 50

dirs=(A B C D E); 
files=(file1.txt); 

for file in "${files[@]}"; 
do
     v=$(awk '{print $1,$2}' ${dirs[1]}/$file)
	  
     for dir in "${dirs[@]}"; 
	do 
	    w=$(awk '{print $5 }' $dir/$file)
         
        done
        echo "$v $w" >> ../test.txt
done

awk -v File=file1.txt -v Dirs_list="A,B,C,D,E" '
BEGIN {
   dirs_count = split(Dirs_list, dirs, ",");
   for (i=1; i<=dirs_count; i++)
      files[i] = dirs[i] "/" File;
   while (getline < files[1]) {
      out = $1 OFS $2 OFS $3;
      for (i=2; i<=dirs_count; i++) {
         getline < files[i];
         out = out OFS $3;
      }
      print out
   }
}
'

> for dir in A B C D E
> do
> echo "--- $dir/file1.txt ---"
> cat $dir/file1.txt
> done
--- A/file1.txt ---
1 1 A11
1 2 A12
--- B/file1.txt ---
1 1 B11
1 2 B12
--- C/file1.txt ---
1 1 C11
1 2 C12
--- D/file1.txt ---
1 1 D11
1 2 D12
--- E/file1.txt ---
1 1 E11
1 2 E12
>

1 1 A11 B11 C11 D11 E11
1 2 A12 B12 C12 D12 E12

for dir in A B C D E
do
   echo $dir/file1.txt
done | 
xargs paste |
awk '{out = $1 OFS $2; for (i=3; i<=NF; i+=3) out = out OFS $i; print out}'

> for dir in A B C D E
do
    echo $dir/file1.txt
done
A/file1.txt
B/file1.txt
C/file1.txt
D/file1.txt
E/file1.txt
>

> for dir in A B C D E
do
    echo $dir/file1.txt
done |
xargs echo paste  # echo for debug purpose
paste A/file1.txt B/file1.txt C/file1.txt D/file1.txt E/file1.txt
>

> for dir in A B C D E
do
    echo $dir/file1.txt
done |
xargs paste
1 1 A11 1 1 B11 1 1 C11 1 1 D11 1 1 E11
1 2 A12 1 2 B12 1 2 C12 1 2 D12 1 2 E12
>

> for dir in A B C D E
do
    echo $dir/file1.txt
done |
xargs paste |
awk '{out = $1 OFS $2; for (i=3; i<=NF; i+=3) out = out OFS $i; print out}'
1 1 A11 B11 C11 D11 E11
1 2 A12 B12 C12 D12 E12
>