File Coverage

blib/lib/Net/Amazon/Request/Actor.pm
Criterion Covered Total %
statement 17 18 94.4
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 23 24 95.8


line stmt bran cond sub pod time code
1             ######################################################################
2             package Net::Amazon::Request::Actor;
3             ######################################################################
4 1     1   927 use warnings;
  1         3  
  1         35  
5 1     1   6 use strict;
  1         3  
  1         40  
6 1     1   5 use base qw(Net::Amazon::Request);
  1         2  
  1         683  
7              
8 1     1   7 use Net::Amazon::Validate::ItemSearch;
  1         2  
  1         103  
9              
10             ##################################################
11             sub new {
12             ##################################################
13 1     1 1 39 my($class, %options) = @_;
14            
15 1         9 $class->_assert_options_defined(\%options,
16             'actor');
17              
18 1         8 $class->_convert_option(\%options,
19             'actor',
20             'Actor');
21              
22 1         9 my $self = $class->SUPER::new(%options);
23              
24 1         16 $self->_convert_itemsearch();
25              
26 0           bless $self, $class; # reconsecrate
27             }
28              
29             1;
30              
31             __END__