Help for this page

Select Code to Download

Select or download this

my @sorted;
for my $key (keys %entry) {
...
        print "$result->[0] $result->[1] $result->[2]\n";
    }
}

Select or download this

TRA 23 4-19
TRA 15 7-15
TRA 2 78-120
BLA 10 2-10
BLA 5 1-10