Shell Programming and Scripting

file 1
abbsss:aa:22:34:as akl abc 1234
mkilll:as:ss:23:qs asc abc 0987
mlopii:cd:wq:24:as asd abc  7866

file2
lkoaa:as:24:32:sa alk abc 3245
lkmo:as:34:43:qs qsa abc 0987
kloia:ds:45:56:sa acq abc 7805

mlopii:cd:wq:24:as asd abc  7866
kloia:ds:45:56:sa acq abc 7805

abbsss:aa:22:34:as akl abc 1234

lkoaa:as:24:32:sa alk abc 3245

 awk 'NR==FNR{a[FNR]=$0;} NR!=FNR{b[FNR]=$0;} END{for(x in a) { split(a[x],c_a," ");split(b[x],c_b," "); if(c_b[4]!= c_a[4] && (c_b[4]-c_a[4]>=100 || c_b[4]-c_a[4] <= -100)) {printf("%s\n%s\n",a[x],b[x]);}}}' file1 file2

awk 'FNR == NR { # Accumulate records from 1st file.
        f1[++n1] = $0
        low1[n1] = $4 - 100
        mid1[n1] = $4
        high1[n1] = $4 + 100
        next
}
        { # Accumulate records from 2nd file
        low2[++n2] = $4 - 100
        high2[n2] = $4 + 100
        # Look for lines in 1st file that are in range of $4 in 2nd file
        for(i = 1; i <= n1; i++)
                if(($4 > low1[i]) && ($4 < high1[i]))
                        next # match found
        # This line is unique.
        print $0 > "UniqueIn2ndFile"
}
END     { # Look for lines in 2nd file that are unique versus 1st file
        for(j = 1; j <= n1; j++) {
                for(i = 1; i <= n2; i++)
                        if((mid1[j] > low2[i]) && (mid1[j] < high2[i]))
                                break # match found
                if(i > n2) print f1[j] > "UniqueIn1stFile"
        }
}' file1 file2

awk 'NR==FNR{a[NR]=$0;b[NR]=$4;next}
{if($4-b[FNR] > 100 || $4-b[FNR] < -100){ print a[FNR]; print $0}}' file1 file2