Select Code to Download

            if (my $key = $Queue->dequeue_nb) {

while( my $key = $Queue->dequeue ) {
    do_something();
}