Select Code to Download

#!/usr/bin/perl 

...
reopen STDERR;

system "perl sleep.pl > out ";

use strict;
use warnings;
...
    $i++;
}
print "finished my beauty sleep\n";