File Coverage

blib/lib/Net/Amazon/S3/Vendor/Amazon.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::Vendor::Amazon::VERSION = '0.991';
2             use Moose 0.85;
3 99     99   674  
  99         1821  
  99         618  
4             # ABSTRACT: Amazon AWS specific behaviour
5              
6             extends 'Net::Amazon::S3::Vendor';
7              
8             use Net::Amazon::S3::Signature::V4;
9 99     99   543908  
  99         246  
  99         9789  
10             has '+host' => (
11             default => 's3.amazonaws.com',
12             );
13              
14             has '+authorization_method' => (
15             default => sub { 'Net::Amazon::S3::Signature::V4' },
16             );
17              
18             my ($self, $bucket) = @_;
19              
20 1     1 1 4 $bucket->_head_region;
21             }
22 1         6  
23             1;
24              
25              
26             =pod
27              
28             =encoding UTF-8
29              
30             =head1 NAME
31              
32             Net::Amazon::S3::Vendor::Amazon - Amazon AWS specific behaviour
33              
34             =head1 VERSION
35              
36             version 0.991
37              
38             =head1 SYNOPSIS
39              
40             my $s3 = Net::Amazon::S3->new (
41             vendor => Net::Amazon::S3::Vendor::Amazon->new,
42             ...
43             );
44              
45             =head1 DESCRIPTION
46              
47             Amazon AWS vendor specification.
48              
49             Supports all L<< Net::Amazon::S3::Vendor >> constructor parameters although
50             usually there is no reason to change it :-)
51              
52             Guess bucket region implementation uses bucket's HEAD region request.
53              
54             =head1 AUTHOR
55              
56             Branislav Zahradník <barney@cpan.org>
57              
58             =head1 COPYRIGHT AND LICENSE
59              
60             This software is copyright (c) 2022 by Amazon Digital Services, Leon Brocard, Brad Fitzpatrick, Pedro Figueiredo, Rusty Conover, Branislav Zahradník.
61              
62             This is free software; you can redistribute it and/or modify it under
63             the same terms as the Perl 5 programming language system itself.
64              
65             =cut