Select Code to Download

#!/usr/bin/perl
use strict;
...
        sleep 30;
    }
}

#!/usr/bin/perl
use strict;
...
    print "zzzzz......\n";
    sleep $cycle_time * 60;
}