Select Code to Download

 
open ONE, '<' ,'one.txt';
open TWO, '<' ,'two.txt';
...
   ++$finished_1, seek ONE,0,0 if eof ONE;
   ++$finished_2, seek TWO,0,0 if eof TWO;
}

1      1
2      2
1      3
2      4
1      5