Yet Another CPAN Grep

RT-Extension-PushoverNotify ( R/RI/RINGERC/RT/Extension/PushoverNotify/RT-Extension-PushoverNotify-0.01.tar.gz, RINGERC, 2013; MetaCPAN )

RT-Extension-PushoverNotify/lib/RT/Action/PushoverNotify.pm ( view source; MetaCPAN )

 5.10.1;
use strict;
use warnings;

use Data::Dumper;
use Scalar::Util qw(looks_like_number);
use JSON;

use LWP::UserAgent; 
use LWP::Protocol::https;

use RT::Extension::PushoverNotify::PushoverNoti

orting');
        return 0;
    }
    $cfg->{'endpoint'} //= 'https://api.pushover.net/1/messages.json';
    if (!defined($self->TemplateObj)) {
        die("Template must be specified for invocations

 $self->{'message'} );
            if ($response->is_success) {
                my(%r) = %{decode_json($response->decoded_content)};
                if (defined($r{'receipt'})) {
                    #