Select Code to Download

>test1
ATGCATGCATGCATGC
>test2
ATGCNATGCNATGCNATGCN

#!/usr/bin/perl -w
$seq = $ARGV[0];
...
} elsif (
"false"){
}

#!/usr/bin/perl -w
use strict;
...
close FILE_OUT;

system( "chmod", "u+x", $FILE_OUT );