File Coverage

blib/lib/Image/OpenALPR/PlateResult.pm

Criterion	Covered	Total	%
statement	11	21	52.3
branch	0	8	0.0
condition			n/a
subroutine	4	6	66.6
pod	1	2	50.0
total	16	37	43.2

package Image::OpenALPR::PlateResult;

use 5.014000;
use strict;
use warnings;

use parent qw/Class::Accessor::Fast/;

our $VERSION = '0.001';

__PACKAGE__->mk_ro_accessors(qw/plate confidence matches_template/);

sub coordinates {
	my $coords = shift->{coordinates};
	return unless $coords;
	my @result = map { [$_->{x}, $_->{y}] } @$coords;
	wantarray ? @result : \@result
}

sub candidates {
	my $cands = shift->{candidates};
	return unless $cands;
	my @result = map { __PACKAGE__->new($_) } @$cands;
	wantarray ? @result : \@result
}

1;
__END__