Yet Another CPAN Grep

WebService-Intercom ( R/RC/RCONOVER/WebService-Intercom-0.09.tar.gz, RCONOVER, 2015; MetaCPAN )

WebService-Intercom/lib/WebService/Intercom.pm ( view source; MetaCPAN )

WP::UserAgent;
    use HTTP::Response;
    use HTTP::Request::Common qw(DELETE POST GET);
    use JSON::XS;
    use MIME::Base64;
    use Kavorka qw( multi method );


    has 'ua' => (is => 'ro', def

st_request_at?,
                                       Maybe[Bool] :$new_session?) {

        my $json_content = {
            signed_up_at => $signed_up_at,
            name => $name,
            las

           $json_content->{user_id} = $user_id;
        }
        if (defined($email)) {
            $json_content->{email} = $email;
        }
        if (defined($id)) {
            $json_content->{