Yet Another CPAN Grep

SMS-Send-UK-GovUkNotify ( A/AN/ANDREWISH/SMS-Send-UK-GovUkNotify-0.0.1.tar.gz, ANDREWISH, 2020; MetaCPAN )

SMS-Send-UK-GovUkNotify/lib/SMS/Send/UK/GovUkNotify.pm ( view source; MetaCPAN )

this driver

=head1 METHODS

=cut

use base 'SMS::Send::Driver';
use LWP::UserAgent();
use JSON qw(encode_json);
use URI::Escape qw(uri_escape);
use Scalar::Util qw( looks_like_number );
use Crypt::JW

Agent->new;
    my $to = clean_number($params{to});

    # Send the request
    my $body = encode_json({
        phone_number => $to,
        template_id  => $self->{template_id},
        personalisat

st(
        $self->{'base_url'} . '/v2/notifications/sms',
        'Content-Type' => 'application/json',
        Authorization  => 'Bearer ' . $self->{'token'},
        Content        => $body
    );