File Coverage

blib/lib/Paws/RedShift/ClusterSecurityGroup.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             package Paws::RedShift::ClusterSecurityGroup;
2 1     1   444 use Moose;
  1     1   2  
  1         19  
  1         454  
  1         3  
  1         5  
3             has ClusterSecurityGroupName => (is => 'ro', isa => 'Str');
4             has Description => (is => 'ro', isa => 'Str');
5             has EC2SecurityGroups => (is => 'ro', isa => 'ArrayRef[Paws::RedShift::EC2SecurityGroup]', request_name => 'EC2SecurityGroup', traits => ['NameInRequest']);
6             has IPRanges => (is => 'ro', isa => 'ArrayRef[Paws::RedShift::IPRange]', request_name => 'IPRange', traits => ['NameInRequest']);
7             has Tags => (is => 'ro', isa => 'ArrayRef[Paws::RedShift::Tag]', request_name => 'Tag', traits => ['NameInRequest']);
8             1;
9              
10             ### main pod documentation begin ###
11              
12             =head1 NAME
13              
14             Paws::RedShift::ClusterSecurityGroup
15              
16             =head1 USAGE
17              
18             This class represents one of two things:
19              
20             =head3 Arguments in a call to a service
21              
22             Use the attributes of this class as arguments to methods. You shouldn't make instances of this class.
23             Each attribute should be used as a named argument in the calls that expect this type of object.
24              
25             As an example, if Att1 is expected to be a Paws::RedShift::ClusterSecurityGroup object:
26              
27             $service_obj->Method(Att1 => { ClusterSecurityGroupName => $value, ..., Tags => $value });
28              
29             =head3 Results returned from an API call
30              
31             Use accessors for each attribute. If Att1 is expected to be an Paws::RedShift::ClusterSecurityGroup object:
32              
33             $result = $service_obj->Method(...);
34             $result->Att1->ClusterSecurityGroupName
35              
36             =head1 DESCRIPTION
37              
38             Describes a security group.
39              
40             =head1 ATTRIBUTES
41              
42              
43             =head2 ClusterSecurityGroupName => Str
44              
45             The name of the cluster security group to which the operation was
46             applied.
47              
48              
49             =head2 Description => Str
50              
51             A description of the security group.
52              
53              
54             =head2 EC2SecurityGroups => ArrayRef[L<Paws::RedShift::EC2SecurityGroup>]
55              
56             A list of EC2 security groups that are permitted to access clusters
57             associated with this cluster security group.
58              
59              
60             =head2 IPRanges => ArrayRef[L<Paws::RedShift::IPRange>]
61              
62             A list of IP ranges (CIDR blocks) that are permitted to access clusters
63             associated with this cluster security group.
64              
65              
66             =head2 Tags => ArrayRef[L<Paws::RedShift::Tag>]
67              
68             The list of tags for the cluster security group.
69              
70              
71              
72             =head1 SEE ALSO
73              
74             This class forms part of L<Paws>, describing an object used in L<Paws::RedShift>
75              
76             =head1 BUGS and CONTRIBUTIONS
77              
78             The source code is located here: https://github.com/pplu/aws-sdk-perl
79              
80             Please report bugs to: https://github.com/pplu/aws-sdk-perl/issues
81              
82             =cut
83