Select Code to Download

#!usr/bin/perl-w
@k=”CCATGNNNAACCNNATGNNTAGCC”;
$s3-11=code??
...
  $s3-11\n\n
  $s16-23.\n\n”;
exit;