Select Code to Download

$ cat pm_1206312_in1
ID121 ABC14
...
ID962 YTS27
ID567 POH70
ID921 BAMD80

$ cat pm_1206312_in2
ID111 RET61
...
ID452 FYU098
ID121 ABC14
ID122 EFG87

$ cat pm_1206312_in3
ID121 ABC14
...
ID745 KIDP36
ID145 XYZ43
ID157 TSR11

$ cat pm_1206312_in25
ID122 EFG87
...
ID921 BAMD80
ID389 TOP30
ID121 ABC14

#!/usr/bin/env perl

...
} 

printf "%s %s\n", $_, $uniq{$_} for sort keys %uniq;

ID121 ABC14
ID122 EFG87
ID157 TSR11