sub reserve {
    my $self = shift;
    my $count = 0;
    warn "RESERVING";
    for my $queue ( @{$self->queues} ) {
        warn "QUEUE $queue";
        use Data::Dumper;
        warn "JOBS " . Dumper [ map { $_->{payload} } $self->resque->peek($queue) ];
        if ( my $job = $self->resque->pop($queue) ) {
            warn "JOB $job";
            return $job;
        }
        warn "NO JOBS!!!";
        return if ++$count == @{$self->queues};
    }
}