File Coverage

blib/lib/Net/Amazon/EC2/DescribeImageAttribute.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::DescribeImageAttribute;
2 2     2   1156 use Moose;
  2         4  
  2         15  
3              
4             =head1 NAME
5              
6             Net::Amazon::EC2::DescribeImageAttribute
7              
8             =head1 DESCRIPTION
9              
10             A class representing the attributes associated with a machine image.
11              
12             =head1 ATTRIBUTES
13              
14             =over
15              
16             =item image_id (required)
17              
18             Image ID you are describing the image attributes of.
19              
20             =item launch_permissions (optional)
21              
22             An array ref of Net::Amazon::EC2::LaunchPermission objects.
23              
24             =item product_codes (optional)
25              
26             An array ref of Net::Amazon::EC2::ProductCode objects.
27              
28             =item kernel (optional)
29              
30             ID of the kernel associated with the AMI. Returned if kernel is
31             specified.
32              
33             =item ramdisk (optional)
34              
35             ID of the RAM disk associated with the AMI. Returned if ramdisk
36             is specified.
37              
38             =item block_device_mapping (optional)
39              
40             An array ref of Net::Amazon::EC2::BlockDeviceMapping objects.
41              
42             =item platform (optional)
43              
44             Describes the operating system platform.
45              
46             =back
47              
48             =cut
49              
50             has 'image_id' => ( is => 'ro', isa => 'Str', required => 1 );
51             has 'launch_permissions' => (
52             is => 'ro',
53             isa => 'Maybe[ArrayRef[Net::Amazon::EC2::LaunchPermission]]',
54             predicate => 'has_launch_permissions',
55             required => 0,
56             );
57             has 'product_codes' => (
58             is => 'ro',
59             isa => 'Maybe[ArrayRef[Net::Amazon::EC2::ProductCode]]',
60             predicate => 'has_product_codes',
61             required => 0,
62             );
63             has 'kernel' => ( is => 'ro', isa => 'Maybe[Str]', required => 0 );
64             has 'ramdisk' => ( is => 'ro', isa => 'Maybe[Str]', required => 0 );
65             has 'blockDeviceMapping' => (
66             is => 'ro',
67             isa => 'Maybe[ArrayRef[Net::Amazon::EC2::BlockDeviceMapping]]',
68             required => 0,
69             );
70             has 'platform' => ( is => 'ro', isa => 'Maybe[Str]', required => 0 );
71              
72             __PACKAGE__->meta->make_immutable();
73              
74             =head1 AUTHOR
75              
76             Jeff Kim <cpan@chosec.com>
77              
78             =head1 COPYRIGHT
79              
80             Copyright (c) 2006-2010 Jeff Kim. This program is free software; you can redistribute it and/or modify it
81             under the same terms as Perl itself.
82              
83             =cut
84              
85 2     2   13000 no Moose;
  2         5  
  2         10  
86             1;