Select Code to Download

$k = 25; 
$N = 10000;

...
    for ($time=0; $time<24; $time ++) {
        print GENE "@cls[$time]\n";
        }

#!usr/bin/perl
use warnings;

...
                
                
                }