until ( $to_sleep_perchance_to_dream ) {
    print scalar localtime, "\n";

    sleep 300;
}