File Coverage

blib/lib/Net/Amazon/S3/Error/Handler.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             package Net::Amazon::S3::Error::Handler;
2             $Net::Amazon::S3::Error::Handler::VERSION = '0.98';
3 96     96   63409 use Moose;
  96         249  
  96         660  
4              
5             # ABSTRACT: A base class for S3 response error handler
6              
7             has s3 => (
8             is => 'ro',
9             isa => 'Net::Amazon::S3',
10             required => 1,
11             );
12              
13             sub handle_error;
14              
15             1;
16              
17             __END__
18              
19             =pod
20              
21             =encoding UTF-8
22              
23             =head1 NAME
24              
25             Net::Amazon::S3::Error::Handler - A base class for S3 response error handler
26              
27             =head1 VERSION
28              
29             version 0.98
30              
31             =head1 CONSTRUCTOR
32              
33             =over
34              
35             =item s3
36              
37             Instance of L<< Net::Amazon::S3 >>
38              
39             =head1 METHODS
40              
41             =head2 handler_error ($response)
42              
43             =head2 handler_error ($response, $request)
44              
45             Method will recieve instance of L<< Net::Amazon::S3::Response >> sub-class.
46              
47             Method should return false (or throw exception) in case of error, true otherwise.
48              
49             =head1 AUTHOR
50              
51             Branislav Zahradník <barney@cpan.org>
52              
53             =head1 COPYRIGHT AND LICENSE
54              
55             This software is copyright (c) 2021 by Amazon Digital Services, Leon Brocard, Brad Fitzpatrick, Pedro Figueiredo, Rusty Conover, Branislav Zahradník.
56              
57             This is free software; you can redistribute it and/or modify it under
58             the same terms as the Perl 5 programming language system itself.
59              
60             =cut