Amazon-MWS

 view release on metacpan or  search on metacpan

lib/Amazon/MWS/XML/Product.pm  view on Meta::CPAN

                       isa => sub { _check_length($_[0], 0, 2000) },
                      );
has category_code => (is => 'ro');
has product_data => (is => 'ro');
has manufacturer_part_number => (is => 'ro',
                                 isa => sub { _check_length($_[0], 0, 40) }
                                );
has manufacturer => (is => 'ro',
                     isa => sub { _check_length($_[0], 0, 50) });

has search_terms => (is => 'ro', isa => ArrayRef);
has features => (is => 'ro', isa => ArrayRef);

sub _check_length {
    my ($value, $min, $max) = @_;
    if (defined $value) {
        die "Max characters is $max" if length($value) > $max;
        die "Min characters is $min" if length($value) < $min;
    }
}

sub _check_units {

lib/Amazon/MWS/XML/Response/OrderReport.pm  view on Meta::CPAN

=head2 shipping_address

An L<Amazon::MWS::XML::Address> instance, lazily built.

=head2 billing_address

An L<Amazon::MWS::XML::Address> instance, lazily built.

=cut

has struct => (is => 'ro', isa => HashRef, required => 1);
has order_number => (is => 'rw');
has shipping_address => (is => 'lazy');
has billing_address => (is => 'lazy');

sub _build_shipping_address {
    my $self = shift;
    if (my $data = $self->struct->{FulfillmentData}) {
        # unclear if we want to check the FulfillmentMethod
        if (my $address = $data->{Address}) {
            return Amazon::MWS::XML::Address->new(%$address);

lib/Amazon/MWS/XML/Response/OrderReport/Item.pm  view on Meta::CPAN

=item ItemFees           

=back

=cut

has Title               => (is => 'ro', isa => Str);
has Quantity            => (is => 'ro', isa => Int);
has SKU                 => (is => 'ro', isa => Str);
has ItemPrice           => (is => 'ro', isa => HashRef);
has ProductTaxCode      => (is => 'ro', isa => Str);
has AmazonOrderItemCode => (is => 'ro', isa => Str);
has ItemFees            => (is => 'ro', isa => HashRef);

=head2 merchant_order_item

Our id (read-write).

=head1 METHODS AND SHORTCUTS

All the methods are read only.

=over 4

 view all matches for this distribution
 view release on metacpan -  search on metacpan