for( 1..10 ){ ## make sure we're not between DQ and $busy++
    sleep 1;
    sleep 1 while $q->pending || $busy;
}