File Coverage

blib/lib/Paws/RedShift/EnableSnapshotCopy.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::RedShift::EnableSnapshotCopy;
3 1     1   560 use Moose;
  1         5  
  1         10  
4             has ClusterIdentifier => (is => 'ro', isa => 'Str', required => 1);
5             has DestinationRegion => (is => 'ro', isa => 'Str', required => 1);
6             has RetentionPeriod => (is => 'ro', isa => 'Int');
7             has SnapshotCopyGrantName => (is => 'ro', isa => 'Str');
8              
9 1     1   11045 use MooseX::ClassAttribute;
  1         3  
  1         12  
10              
11             class_has _api_call => (isa => 'Str', is => 'ro', default => 'EnableSnapshotCopy');
12             class_has _returns => (isa => 'Str', is => 'ro', default => 'Paws::RedShift::EnableSnapshotCopyResult');
13             class_has _result_key => (isa => 'Str', is => 'ro', default => 'EnableSnapshotCopyResult');
14             1;
15              
16             ### main pod documentation begin ###
17              
18             =head1 NAME
19              
20             Paws::RedShift::EnableSnapshotCopy - Arguments for method EnableSnapshotCopy on Paws::RedShift
21              
22             =head1 DESCRIPTION
23              
24             This class represents the parameters used for calling the method EnableSnapshotCopy on the
25             Amazon Redshift service. Use the attributes of this class
26             as arguments to method EnableSnapshotCopy.
27              
28             You shouldn't make instances of this class. Each attribute should be used as a named argument in the call to EnableSnapshotCopy.
29              
30             As an example:
31              
32             $service_obj->EnableSnapshotCopy(Att1 => $value1, Att2 => $value2, ...);
33              
34             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.
35              
36             =head1 ATTRIBUTES
37              
38              
39             =head2 B<REQUIRED> ClusterIdentifier => Str
40              
41             The unique identifier of the source cluster to copy snapshots from.
42              
43             Constraints: Must be the valid name of an existing cluster that does
44             not already have cross-region snapshot copy enabled.
45              
46              
47              
48             =head2 B<REQUIRED> DestinationRegion => Str
49              
50             The destination region that you want to copy snapshots to.
51              
52             Constraints: Must be the name of a valid region. For more information,
53             see Regions and Endpoints in the Amazon Web Services General Reference.
54              
55              
56              
57             =head2 RetentionPeriod => Int
58              
59             The number of days to retain automated snapshots in the destination
60             region after they are copied from the source region.
61              
62             Default: 7.
63              
64             Constraints: Must be at least 1 and no more than 35.
65              
66              
67              
68             =head2 SnapshotCopyGrantName => Str
69              
70             The name of the snapshot copy grant to use when snapshots of an AWS
71             KMS-encrypted cluster are copied to the destination region.
72              
73              
74              
75              
76             =head1 SEE ALSO
77              
78             This class forms part of L<Paws>, documenting arguments for method EnableSnapshotCopy in L<Paws::RedShift>
79              
80             =head1 BUGS and CONTRIBUTIONS
81              
82             The source code is located here: https://github.com/pplu/aws-sdk-perl
83              
84             Please report bugs to: https://github.com/pplu/aws-sdk-perl/issues
85              
86             =cut
87