Yet Another CPAN Grep

App-TimeTracker-Command-TellSlack ( D/DO/DOMM/App-TimeTracker-Command-TellSlack-1.001.tar.gz, DOMM, 2016; MetaCPAN )

App-TimeTracker-Command-TellSlack/lib/App/TimeTracker/Command/TellSlack.pm ( view source; MetaCPAN )

a1_hex);
use URI::Escape;
use App::TimeTracker::Utils qw(error_message);
use Encode;
use JSON::XS qw(encode_json);

has 'tell_slack' => (
    is            => 'ro',
    isa           => 'Bool',
    de

oad->{username} = $cfg->{username} if $cfg->{username};

    $request->content(decode_utf8(encode_json($payload)));
    my $res = $ua->request($request);
    unless ( $res->is_success ) {
        erro