Yet Another CPAN Grep

Minion-Backend-Redis ( D/DF/DFUG/Minion-Backend-Redis-0.003.tar.gz, DFUG, 2021; MetaCPAN )

Minion-Backend-Redis/lib/Minion/Backend/Redis.pm ( view source; MetaCPAN )

ak';
use Digest::SHA 'sha256_base64';
use List::Util 'any';
use Mojo::IOLoop;
use Mojo::JSON qw(from_json to_json);
use Mojo::Redis;
use Mojo::Util 'encode';
use Sort::Versions 'versioncmp';
use Sys::

lf, $command, $args, $ids ) =
      ( shift, shift, shift || [], shift || [] );
    my $item = to_json( [ $command, @$args ] );
    my %worker_ids =
      map { ( $_ => 1 ) } @{ $self->redis->db->smem

redis->db->incr('minion.last_job_id');

    my %notes = %{ $options->{notes} || {} };
    $_ = to_json($_) for values %notes;
    my $parents  = $options->{parents} || [];
    my $queue    = $options-