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.98';
4 96     96   807 use Moose 0.85;
  96         2888  
  96         771  
5 96     96   664657 use MooseX::StrictConstructor 0.16;
  96         2361  
  96         894  
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   9 my ($self) = @_;
18              
19 4         7 return %{ $self->headers };
  4         152  
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.98
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