Select Code to Download

my $A;

...
        print "\t $i recognised as part of the 1st domain using the ol
+d method\n";
        }
    }

my @domains = (    [1..119],
        [325..648],
...
        }
    }