ALPR;
use 5.014000;
use strict;
use warnings;
use Image::OpenALPR::PlateResult;
use JSON::MaybeXS qw/decode_json/;
use XSLoader;
BEGIN {
our $VERSION = '0.001001';
XSLoader::load('Image::OpenALPR
;
my $json = ref $data eq 'SCALAR' ? $alpr->recognizeArray($$data) : $alpr->recognizeFile($data);
$json = decode_json $json;
my @plates = map { Image::OpenALPR::PlateResult->new($_) } @{$json->{res