File Coverage

blib/lib/Net/Amazon/S3/Operation/Object/Upload/Parts/Request.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Net::Amazon::S3::Operation::Object::Upload::Parts::Request;
2             # ABSTRACT: List the parts in a multipart upload.
3             $Net::Amazon::S3::Operation::Object::Upload::Parts::Request::VERSION = '0.99';
4 99     99   832 use Moose 0.85;
  99         2859  
  99         764  
5 99     99   667782 use MooseX::StrictConstructor 0.16;
  99         2335  
  99         772  
6             extends 'Net::Amazon::S3::Request::Object';
7              
8             with 'Net::Amazon::S3::Request::Role::Query::Param::Upload_id';
9             with 'Net::Amazon::S3::Request::Role::HTTP::Method::GET';
10              
11             has 'headers' =>
12             ( is => 'ro', isa => 'HashRef', required => 0, default => sub { {} } );
13              
14             __PACKAGE__->meta->make_immutable;
15              
16             sub _request_headers {
17 4     4   13 my ($self) = @_;
18              
19 4         7 return %{ $self->headers };
  4         159  
20             }
21              
22             1;
23              
24             __END__
25              
26             =pod
27              
28             =encoding UTF-8
29              
30             =head1 NAME
31              
32             Net::Amazon::S3::Operation::Object::Upload::Parts::Request - List the parts in a multipart upload.
33              
34             =head1 VERSION
35              
36             version 0.99
37              
38             =head1 DESCRIPTION
39              
40             Implements an operation L<< ListParts|https://docs.aws.amazon.com/AmazonS3/latest/API/API_ListParts.html >>
41              
42             =head1 AUTHOR
43              
44             Branislav Zahradník <barney@cpan.org>
45              
46             =head1 COPYRIGHT AND LICENSE
47              
48             This software is copyright (c) 2021 by Amazon Digital Services, Leon Brocard, Brad Fitzpatrick, Pedro Figueiredo, Rusty Conover, Branislav Zahradník.
49              
50             This is free software; you can redistribute it and/or modify it under
51             the same terms as the Perl 5 programming language system itself.
52              
53             =cut