Select Code to Download

$ perl -e 'use strict;
> use warnings;
...
> }
> '
AAAAA AAAAT AAAAC AAAAG AAATA (... many string omitted for brevity ...
+) GGGGA GGGGT GGGGC GGGGG

use strict;
use warnings;
...
    }
    add_to_strings ($len - 1, @temp);
}