File Coverage

blib/lib/Net/Easypost/Parcel.pm

Criterion	Covered	Total	%
statement	6	11	54.5
branch			n/a
condition			n/a
subroutine	4	5	80.0
pod	1	1	100.0
total	11	17	64.7

package Net::Easypost::Parcel;
$Net::Easypost::Parcel::VERSION = '0.21';
use Moo;
with qw(Net::Easypost::PostOnBuild);
with qw(Net::Easypost::Resource);

has [qw/length width height weight predefined_package/] => (
    is => 'rw',
);

sub _build_fieldnames {
    return [qw/length width height weight predefined_package/];
}
sub _build_role      { 'parcel'   }
sub _build_operation { '/parcels' }

sub clone {
    my ($self) = @_;

    return Net::Easypost::Parcel->new(
        map  { $_ => $self->$_ }
        grep { defined $self->$_ }
           'id', @{ $self->fieldnames }
    );
}

1;

__END__