use strict; use warnings;

use HTTP::Tiny;

my $ua = HTTP::Tiny->new;

my $url = "https://www.website.com/api/v1/sms/send";

my $data = {
    apiKey  => "edftr44456",
    from    => "demo",
    to      => "447777777777",
    message => "demo HTTP API",
};

my $response = $ua->post_form( $url, $data );

print $response->{'status'} . "\n";