13:06 >perl main.pl
-------------------------------------
frag    id1     file1   id2     file2
-------------------------------------
accb    10      1               0
bbc     11      1       14      1
ccd     12      1       15      1
kks             0       12      1
llk             0       11      1
-------------------------------------

13:07 >