Select Code to Download

open ONE, '<' ,'one.txt';
open TWO, '<' ,'two.txt';
...
   $go--, seek ONE,0,0 if eof ONE;
   $go--, seek TWO,0,0 if eof TWO;
}

1      1
2      2
3      3
1      4
2      5