view release on metacpan or  search on metacpan

lib/App/MadEye/Plugin/Agent/Qudo/ExceptionLog.pm  view on Meta::CPAN

            dsn      => $dsn,
            username => $user,
            password => $password,
        }],
    );

    my $exceptions = $qudo->exception_list;
    if (scalar(@{$exceptions->{$dsn}}) >= 1) {
        return 'qudo has exceptions...';
    } else {
        return; # alive.
    }
}

1;
__END__

=head1 NAME

App::MadEye::Plugin::Agent::Qudo::ExceptionLog - monitoring exception count of Qudo

lib/App/MadEye/Plugin/Agent/Qudo/Job.pm  view on Meta::CPAN

            dsn      => $dsn,
            username => $user,
            password => $password,
        }],
    );

    my $job_count = $qudo->job_count;
    if ($job_count->{$dsn} >= $threshold) {
        return sprintf(q{qudo has many job '%s': %s count.}, $dsn, $job_count->{$dsn});                                                                                                                           
    } else {
        return; # alive.
    }
}

1;
__END__

=head1 NAME

App::MadEye::Plugin::Agent::Qudo::Job - monitoring job count of Qudo