Select Code to Download

use strict;
use warnings;
...
    print $outFH $acc;
    $acc = q{};
}

acacccacacacaccacacccacacaccacacccacacccacacaccaca
^nnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn
...
ctagccctagccctagccctaacccctaacccctaaccctaagccgaagc
gaccctga^nnnnn^cccccgacccc^nnnnn^gccctaaccctaaccct
gaccctga^nnnnnnnnnnnn^ctaacccgaacccgaacccgaacc^nn^