CPAN::Groonga

>  "https://driver-vehicle-licensing.api.gov.uk/vehicle-enquiry",
	_use_uat => 0
};
use Carp;
use JSON;
use Try::Tiny;
use Scalar::Util qw(looks_like_number);

our $VERSION = '0.4';

sub BUILD
{	
	my 

vrm) > 7;

	my $msg_json = "{\"registrationNumber\": \"$vrm\"}";
	my $req = HTTP::Request->new('POST', $self->_url."/v1/vehicles");
	$req->header('Content-Type' => 'application/json');
	$req->header('

/json');
	$req->header('x-api-key' => $self->ves_api_key);
	$req->content($msg_json);
	my $response = $self->_ua->request($req);
	my $content = $response->decoded_content();
	my $json;
	try
	{
		$json

t'} = $newval;
	}
	
	if($self->{'markedForExport'}) { return 1 };		# Looks pointless but converts JSON::PP::Boolean into 1 or 0
	return 0;
}

=pod

=item monthOfFirstRegistration()

The month in which