Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...

    print "$file ->\t$textFile1\t$textFile2", "\n";
}

Select or download this

fileA.ptseq ->    fileA1.txt    fileA2.txt
fileB.ptseq ->    fileB1.txt    fileB2.txt
fileC.ptseq ->    fileC1.txt    fileC2.txt
fileD.ptseq ->    fileD1.txt    fileD2.txt