File Coverage

blib/lib/Net/Amazon/EC2/UserIdGroupPair.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 Net::Amazon::EC2::UserIdGroupPair;
2 2     2   1443 use Moose;
  2         6  
  2         15  
3              
4             =head1 NAME
5              
6             Net::Amazon::EC2::UserIdGroupPair
7              
8             =head1 DESCRIPTION
9              
10             A class representing the User ID and Group pair used with security group operations.
11              
12             =head1 ATTRIBUTES
13              
14             =over
15              
16             =item user_id (required)
17              
18             AWS Access Key ID of the user.
19              
20             =item group_name (required)
21              
22             Name of the security group.
23              
24             =cut
25              
26             has 'user_id' => ( is => 'ro', isa => 'Str', required => 1 );
27             has 'group_name' => ( is => 'ro', isa => 'Maybe[Str]', required => 1 );
28              
29             __PACKAGE__->meta->make_immutable();
30              
31             =back
32              
33             =head1 AUTHOR
34              
35             Jeff Kim <cpan@chosec.com>
36              
37             =head1 COPYRIGHT
38              
39             Copyright (c) 2006-2010 Jeff Kim. This program is free software; you can redistribute it and/or modify it
40             under the same terms as Perl itself.
41              
42             =cut
43              
44 2     2   8844 no Moose;
  2         6  
  2         12  
45             1;