Select Code to Download

my %nregs;

...
    do_addregion_for_all_regions();
    $nregs{getseqname($_)} = \@nreg;
}