Select Code to Download

eval "use Time::HiRes qw( time sleep )";

...

    sleep 15 - ((time() - $time) % 15);
}