File Coverage

blib/lib/Paws/Glacier/SetVaultAccessPolicy.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::Glacier::SetVaultAccessPolicy;
3 1     1   406 use Moose;
  1         2  
  1         7  
4             has AccountId => (is => 'ro', isa => 'Str', traits => ['ParamInURI'], uri_name => 'accountId' , required => 1);
5             has Policy => (is => 'ro', isa => 'Paws::Glacier::VaultAccessPolicy');
6             has VaultName => (is => 'ro', isa => 'Str', traits => ['ParamInURI'], uri_name => 'vaultName' , required => 1);
7              
8 1     1   6188 use MooseX::ClassAttribute;
  1         4  
  1         10  
9             class_has _stream_param => (is => 'ro', default => 'Policy');
10             class_has _api_call => (isa => 'Str', is => 'ro', default => 'SetVaultAccessPolicy');
11             class_has _api_uri => (isa => 'Str', is => 'ro', default => '/{accountId}/vaults/{vaultName}/access-policy');
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             1;
16              
17             ### main pod documentation begin ###
18              
19             =head1 NAME
20              
21             Paws::Glacier::SetVaultAccessPolicy - Arguments for method SetVaultAccessPolicy on Paws::Glacier
22              
23             =head1 DESCRIPTION
24              
25             This class represents the parameters used for calling the method SetVaultAccessPolicy on the
26             Amazon Glacier service. Use the attributes of this class
27             as arguments to method SetVaultAccessPolicy.
28              
29             You shouldn't make instances of this class. Each attribute should be used as a named argument in the call to SetVaultAccessPolicy.
30              
31             As an example:
32              
33             $service_obj->SetVaultAccessPolicy(Att1 => $value1, Att2 => $value2, ...);
34              
35             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.
36              
37             =head1 ATTRIBUTES
38              
39              
40             =head2 B<REQUIRED> AccountId => Str
41              
42             The C<AccountId> value is the AWS account ID of the account that owns
43             the vault. You can either specify an AWS account ID or optionally a
44             single 'C<->' (hyphen), in which case Amazon Glacier uses the AWS
45             account ID associated with the credentials used to sign the request. If
46             you use an account ID, do not include any hyphens ('-') in the ID.
47              
48              
49              
50             =head2 Policy => L<Paws::Glacier::VaultAccessPolicy>
51              
52             The vault access policy as a JSON string.
53              
54              
55              
56             =head2 B<REQUIRED> VaultName => Str
57              
58             The name of the vault.
59              
60              
61              
62              
63             =head1 SEE ALSO
64              
65             This class forms part of L<Paws>, documenting arguments for method SetVaultAccessPolicy in L<Paws::Glacier>
66              
67             =head1 BUGS and CONTRIBUTIONS
68              
69             The source code is located here: https://github.com/pplu/aws-sdk-perl
70              
71             Please report bugs to: https://github.com/pplu/aws-sdk-perl/issues
72              
73             =cut
74