Yet Another CPAN Grep

Plack-Middleware-PostErrorToSlack ( H/HI/HITODE/Plack-Middleware-PostErrorToSlack-0.01.tar.gz, HITODE, 2015; MetaCPAN )

Plack-Middleware-PostErrorToSlack/lib/Plack/Middleware/PostErrorToSlack.pm ( view source; MetaCPAN )

ent qw(Plack::Middleware);

use Plack::Response;
use Try::Tiny;

use LWP::UserAgent;
use JSON::XS qw(encode_json);

sub call {
    my $self = shift;
    my $env = shift;

    my $error;
    my $res =

  $payload->{$key} = $value;
    }

    $ua->post($self->webhook_url, {
        payload => encode_json($payload),
    });
}

sub error_message {
    my ($self, $env, $error) = @_;

    my $user = $ENV