File Coverage

blib/lib/Paws/S3/PutBucketTagging.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              
2             package Paws::S3::PutBucketTagging;
3 1     1   867 use Moose;
  1         4  
  1         14  
4             has Bucket => (is => 'ro', isa => 'Str', uri_name => 'Bucket', traits => ['ParamInURI'], required => 1);
5             has ContentMD5 => (is => 'ro', isa => 'Str', header_name => 'Content-MD5', traits => ['ParamInHeader']);
6             has Tagging => (is => 'ro', isa => 'Paws::S3::Tagging', required => 1);
7              
8 1     1   11653 use MooseX::ClassAttribute;
  1         4  
  1         13  
9              
10             class_has _api_call => (isa => 'Str', is => 'ro', default => 'PutBucketTagging');
11             class_has _api_uri => (isa => 'Str', is => 'ro', default => '/{Bucket}?tagging');
12             class_has _api_method => (isa => 'Str', is => 'ro', default => 'PUT');
13             class_has _returns => (isa => 'Str', is => 'ro', default => 'Paws::API::Response');
14             class_has _result_key => (isa => 'Str', is => 'ro');
15            
16             1;
17              
18             ### main pod documentation begin ###
19              
20             =head1 NAME
21              
22             Paws::S3::PutBucketTagging - Arguments for method PutBucketTagging on Paws::S3
23              
24             =head1 DESCRIPTION
25              
26             This class represents the parameters used for calling the method PutBucketTagging on the
27             Amazon Simple Storage Service service. Use the attributes of this class
28             as arguments to method PutBucketTagging.
29              
30             You shouldn't make instances of this class. Each attribute should be used as a named argument in the call to PutBucketTagging.
31              
32             As an example:
33              
34             $service_obj->PutBucketTagging(Att1 => $value1, Att2 => $value2, ...);
35              
36             Values for attributes that are native types (Int, String, Float, etc) can passed as-is (scalar values). Values for complex Types (objects) can be passed as a HashRef. The keys and values of the hashref will be used to instance the underlying object.
37              
38             =head1 ATTRIBUTES
39              
40              
41             =head2 B<REQUIRED> Bucket => Str
42              
43              
44              
45              
46              
47             =head2 ContentMD5 => Str
48              
49              
50              
51              
52              
53             =head2 B<REQUIRED> Tagging => L<Paws::S3::Tagging>
54              
55              
56              
57              
58              
59              
60             =head1 SEE ALSO
61              
62             This class forms part of L<Paws>, documenting arguments for method PutBucketTagging in L<Paws::S3>
63              
64             =head1 BUGS and CONTRIBUTIONS
65              
66             The source code is located here: https://github.com/pplu/aws-sdk-perl
67              
68             Please report bugs to: https://github.com/pplu/aws-sdk-perl/issues
69              
70             =cut
71