Select Code to Download

my $inputfile = 'Ath_orig.fa';
my $outputfile = 'Ath_tybalt_shuffle.fa';

#!/usr/bin/perl
#tybalt89_DNAfreq_Random_Generator.pl

...
$all and output();
close IN;
close OUT;