File Coverage

blib/lib/Paws/S3/PutObjectTagging.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::PutObjectTagging;
3 1     1   701 use Moose;
  1         2  
  1         10  
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 Key => (is => 'ro', isa => 'Str', uri_name => 'Key', traits => ['ParamInURI'], required => 1);
7             has Tagging => (is => 'ro', isa => 'Paws::S3::Tagging', required => 1);
8             has VersionId => (is => 'ro', isa => 'Str', query_name => 'versionId', traits => ['ParamInQuery']);
9              
10 1     1   7317 use MooseX::ClassAttribute;
  1         5  
  1         15  
11              
12             class_has _api_call => (isa => 'Str', is => 'ro', default => 'PutObjectTagging');
13             class_has _api_uri => (isa => 'Str', is => 'ro', default => '/{Bucket}/{Key+}?tagging');
14             class_has _api_method => (isa => 'Str', is => 'ro', default => 'PUT');
15             class_has _returns => (isa => 'Str', is => 'ro', default => 'Paws::S3::PutObjectTaggingOutput');
16             class_has _result_key => (isa => 'Str', is => 'ro');
17            
18             1;
19              
20             ### main pod documentation begin ###
21              
22             =head1 NAME
23              
24             Paws::S3::PutObjectTagging - Arguments for method PutObjectTagging on Paws::S3
25              
26             =head1 DESCRIPTION
27              
28             This class represents the parameters used for calling the method PutObjectTagging on the
29             Amazon Simple Storage Service service. Use the attributes of this class
30             as arguments to method PutObjectTagging.
31              
32             You shouldn't make instances of this class. Each attribute should be used as a named argument in the call to PutObjectTagging.
33              
34             As an example:
35              
36             $service_obj->PutObjectTagging(Att1 => $value1, Att2 => $value2, ...);
37              
38             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.
39              
40             =head1 ATTRIBUTES
41              
42              
43             =head2 B<REQUIRED> Bucket => Str
44              
45              
46              
47              
48              
49             =head2 ContentMD5 => Str
50              
51              
52              
53              
54              
55             =head2 B<REQUIRED> Key => Str
56              
57              
58              
59              
60              
61             =head2 B<REQUIRED> Tagging => L<Paws::S3::Tagging>
62              
63              
64              
65              
66              
67             =head2 VersionId => Str
68              
69              
70              
71              
72              
73              
74             =head1 SEE ALSO
75              
76             This class forms part of L<Paws>, documenting arguments for method PutObjectTagging in L<Paws::S3>
77              
78             =head1 BUGS and CONTRIBUTIONS
79              
80             The source code is located here: https://github.com/pplu/aws-sdk-perl
81              
82             Please report bugs to: https://github.com/pplu/aws-sdk-perl/issues
83              
84             =cut
85