Select Code to Download

use warnings;
use strict;
...
}

print "check is now $check\n";

use strict;
use warnings;
...
    sleep 1;
    print ".\n";
}