Select Code to Download

#original seq

...
cgt
tta
tac         #fifth substring

#!/usr/local/bin/perl
use strict;
...

__DATA__
accgttac