File Coverage

blib/lib/Net/Amazon/S3/Operation/Buckets/List/Request.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 12 12 100.0


line stmt bran cond sub pod time code
1             $Net::Amazon::S3::Operation::Buckets::List::Request::VERSION = '0.991';
2             use Moose 0.85;
3 99     99   620 use MooseX::StrictConstructor 0.16;
  99         1795  
  99         575  
4 99     99   525098 extends 'Net::Amazon::S3::Request::Service';
  99         1620  
  99         657  
5              
6             # ABSTRACT: An internal class to list all buckets
7              
8             with 'Net::Amazon::S3::Request::Role::HTTP::Method::GET';
9              
10             __PACKAGE__->meta->make_immutable;
11              
12             # AWS routes request without specific region to us-east-1
13             #
14             # https://docs.aws.amazon.com/general/latest/gr/rande.html
15              
16             my $self = shift;
17             return $self->_build_http_request (
18 12     12 1 24 use_virtual_host => 0,
19 12         310 region => $self->s3->vendor->default_region,
20             );
21             }
22              
23             1;
24              
25              
26             =pod
27              
28             =encoding UTF-8
29              
30             =head1 NAME
31              
32             Net::Amazon::S3::Operation::Buckets::List::Request - An internal class to list all buckets
33              
34             =head1 VERSION
35              
36             version 0.991
37              
38             =head1 SYNOPSIS
39              
40             my $request = Net::Amazon::S3::Operation::Buckets::List::Request->new (
41             s3 => $s3,
42             );
43              
44             =head1 DESCRIPTION
45              
46             This module lists all buckets.
47              
48             Implements operation L<< ListBuckets|https://docs.aws.amazon.com/AmazonS3/latest/API/API_ListBuckets.html >>
49              
50             =for test_synopsis no strict 'vars'
51              
52             =head1 METHODS
53              
54             =head2 http_request
55              
56             This method returns a HTTP::Request object.
57              
58             =head1 AUTHOR
59              
60             Branislav Zahradník <barney@cpan.org>
61              
62             =head1 COPYRIGHT AND LICENSE
63              
64             This software is copyright (c) 2022 by Amazon Digital Services, Leon Brocard, Brad Fitzpatrick, Pedro Figueiredo, Rusty Conover, Branislav Zahradník.
65              
66             This is free software; you can redistribute it and/or modify it under
67             the same terms as the Perl 5 programming language system itself.
68              
69             =cut