Select Code to Download

#original seq

...
cgt
tta
tac         #fifth substring

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

__DATA__
accgttac

use warnings;
use strict;
...
           )
          );
}