package WebService::JotForm;
use strict;
use warnings FATAL => 'all';
use Moo;
use JSON::MaybeXS;
use LWP::UserAgent;
use URI::Escape qw(uri_escape);
use Carp qw(croak);
=head1 NAME
WebService::Jot
in wrapper around the JotForm API. All results are what's returned by the JotForm API,
with the JSON being converted into Perl data structures.
You need a JotForm API key to use this module. The e
'ro', default => 'v1');
has 'agent' => ( is => 'rw'); # Must act like LWP::UserAgent
my $json = JSON::MaybeXS->new;
sub BUILD {
my ($self) = @_;
if(not $self->agent) {
$self->agent(LWP::U