File Coverage

blib/lib/Net/Amazon/S3/Request/Object.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             # ABSTRACT: Base class for all S3 Object operations
2             $Net::Amazon::S3::Request::Object::VERSION = '0.991';
3             use Moose 0.85;
4 99     99   47725 use MooseX::StrictConstructor 0.16;
  99         1488  
  99         595  
5 99     99   522306 extends 'Net::Amazon::S3::Request::Bucket';
  99         1491  
  99         538  
6              
7             has key => (
8             is => 'ro',
9             isa => 'Str',
10             required => 1,
11             );
12              
13             override _request_path => sub {
14             my ($self) = @_;
15              
16             return super . (join '/', map {$self->s3->_urlencode($_)} split /\//, $self->key);
17             };
18              
19             __PACKAGE__->meta->make_immutable;
20              
21             1;
22              
23              
24             =pod
25              
26             =encoding UTF-8
27              
28             =head1 NAME
29              
30             Net::Amazon::S3::Request::Object - Base class for all S3 Object operations
31              
32             =head1 VERSION
33              
34             version 0.991
35              
36             =head1 AUTHOR
37              
38             Branislav Zahradník <barney@cpan.org>
39              
40             =head1 COPYRIGHT AND LICENSE
41              
42             This software is copyright (c) 2022 by Amazon Digital Services, Leon Brocard, Brad Fitzpatrick, Pedro Figueiredo, Rusty Conover, Branislav Zahradník.
43              
44             This is free software; you can redistribute it and/or modify it under
45             the same terms as the Perl 5 programming language system itself.
46              
47             =cut