File Coverage

blib/lib/Net/Stripe/Invoiceitem.pm
Criterion Covered Total %
statement 9 12 75.0
branch 0 4 0.0
condition n/a
subroutine 3 4 75.0
pod n/a
total 12 20 60.0


line stmt bran cond sub pod time code
1             package Net::Stripe::Invoiceitem;
2             $Net::Stripe::Invoiceitem::VERSION = '0.40_005'; # TRIAL
3              
4 2     2   14 $Net::Stripe::Invoiceitem::VERSION = '0.40005';use Moose;
  2         4  
  2         15  
5 2     2   12126 use Kavorka;
  2         3  
  2         16  
6             extends 'Net::Stripe::Resource';
7             with 'MooseX::Clone';
8              
9             # ABSTRACT: represent an Invoice Item object from Stripe
10              
11             has 'id' => (is => 'ro', isa => 'Maybe[Str]');
12             has 'customer' => (is => 'ro', isa => 'Maybe[Str]', required => 1);
13             has 'amount' => (is => 'rw', isa => 'Maybe[Int]', required => 1);
14             has 'currency' => (is => 'rw', isa => 'Maybe[Str]', required => 1, clearer => 'clear_currency');
15             has 'description' => (is => 'rw', isa => 'Maybe[Str]');
16             has 'date' => (is => 'ro', isa => 'Maybe[Int]');
17             has 'invoice' => (is => 'ro', isa => 'Maybe[Str]');
18             has 'metadata' => (is => 'rw', isa => 'Maybe[HashRef]');
19              
20 2 0   2   4286 method form_fields {
  2     0   4  
  2         280  
  0            
  0            
21 0 0         return $self->form_fields_for(
22             qw/amount currency description invoice metadata/,
23             ($self->id ? () : qw/customer/)
24             );
25             }
26              
27             __PACKAGE__->meta->make_immutable;
28             1;
29              
30             __END__
31              
32             =pod
33              
34             =head1 NAME
35              
36             Net::Stripe::Invoiceitem - represent an Invoice Item object from Stripe
37              
38             =head1 VERSION
39              
40             version 0.40_005
41              
42             =head1 ATTRIBUTES
43              
44             =head2 amount
45              
46             Reader: amount
47              
48             Writer: amount
49              
50             Type: Maybe[Int]
51              
52             This attribute is required.
53              
54             =head2 boolean_attributes
55              
56             Reader: boolean_attributes
57              
58             Type: ArrayRef[Str]
59              
60             =head2 currency
61              
62             Reader: currency
63              
64             Writer: currency
65              
66             Type: Maybe[Str]
67              
68             This attribute is required.
69              
70             =head2 customer
71              
72             Reader: customer
73              
74             Type: Maybe[Str]
75              
76             This attribute is required.
77              
78             =head2 date
79              
80             Reader: date
81              
82             Type: Maybe[Int]
83              
84             =head2 description
85              
86             Reader: description
87              
88             Writer: description
89              
90             Type: Maybe[Str]
91              
92             =head2 id
93              
94             Reader: id
95              
96             Type: Maybe[Str]
97              
98             =head2 invoice
99              
100             Reader: invoice
101              
102             Type: Maybe[Str]
103              
104             =head2 metadata
105              
106             Reader: metadata
107              
108             Writer: metadata
109              
110             Type: Maybe[HashRef]
111              
112             =head1 AUTHORS
113              
114             =over 4
115              
116             =item *
117              
118             Luke Closs
119              
120             =item *
121              
122             Rusty Conover
123              
124             =back
125              
126             =head1 COPYRIGHT AND LICENSE
127              
128             This software is copyright (c) 2015 by Prime Radiant, Inc., (c) copyright 2014 Lucky Dinosaur LLC.
129              
130             This is free software; you can redistribute it and/or modify it under
131             the same terms as the Perl 5 programming language system itself.
132              
133             =cut