File Coverage

blib/lib/Net/Amazon/S3/Operation/Bucket/Acl/Fetch/Request.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             package Net::Amazon::S3::Operation::Bucket::Acl::Fetch::Request;
2             # ABSTRACT: An internal class to get a bucket's access control
3             $Net::Amazon::S3::Operation::Bucket::Acl::Fetch::Request::VERSION = '0.98';
4 96     96   819 use Moose 0.85;
  96         2958  
  96         900  
5 96     96   693130 use MooseX::StrictConstructor 0.16;
  96         2251  
  96         897  
6             extends 'Net::Amazon::S3::Request::Bucket';
7              
8             with 'Net::Amazon::S3::Request::Role::Query::Action::Acl';
9             with 'Net::Amazon::S3::Request::Role::HTTP::Method::GET';
10              
11             __PACKAGE__->meta->make_immutable;
12              
13             1;
14              
15             __END__
16              
17             =pod
18              
19             =encoding UTF-8
20              
21             =head1 NAME
22              
23             Net::Amazon::S3::Operation::Bucket::Acl::Fetch::Request - An internal class to get a bucket's access control
24              
25             =head1 VERSION
26              
27             version 0.98
28              
29             =head1 SYNOPSIS
30              
31             my $http_request = Net::Amazon::S3::Operation::Bucket::Acl::Fetch::Request->new (
32             s3 => $s3,
33             bucket => $bucket,
34             );
35              
36             =head1 DESCRIPTION
37              
38             Implements operation L<< GetBucketAcl|https://docs.aws.amazon.com/AmazonS3/latest/API/API_GetBucketAcl.html >>
39              
40             This module gets a bucket's access control.
41              
42             =for test_synopsis no strict 'vars'
43              
44             =head1 METHODS
45              
46             =head2 http_request
47              
48             This method returns a HTTP::Request object.
49              
50             =head1 AUTHOR
51              
52             Branislav ZahradnĂ­k <barney@cpan.org>
53              
54             =head1 COPYRIGHT AND LICENSE
55              
56             This software is copyright (c) 2021 by Amazon Digital Services, Leon Brocard, Brad Fitzpatrick, Pedro Figueiredo, Rusty Conover, Branislav ZahradnĂ­k.
57              
58             This is free software; you can redistribute it and/or modify it under
59             the same terms as the Perl 5 programming language system itself.
60              
61             =cut