while( my($returned_value) = $queue->dequeue ) {
[download]

You forget that $queue->dequeue always returns an array with at least 1 element. So the condition being checked is always 1 or higher. Something like:

while( my ($returned_value) = $queue->dequeue ) {
    last unless defined $returned_value;
[download]

should do the trick, I think.

Liz