File Coverage

blib/lib/Net/Stripe/Source.pm
Criterion Covered Total %
statement 9 12 75.0
branch 0 2 0.0
condition n/a
subroutine 3 4 75.0
pod n/a
total 12 18 66.6


line stmt bran cond sub pod time code
1             package Net::Stripe::Source;
2             $Net::Stripe::Source::VERSION = '0.42';
3 2     2   17 use Moose;
  2         5  
  2         17  
4 2     2   14364 use Kavorka;
  2         4  
  2         24  
5             extends 'Net::Stripe::Resource';
6              
7             # ABSTRACT: represent a Source object from Stripe
8              
9             # Object creation
10             has 'amount' => (is => 'ro', isa => 'Maybe[Int]');
11             has 'currency' => (is => 'ro', isa => 'Maybe[Str]');
12             has 'flow' => (is => 'ro', isa => 'Maybe[StripeSourceFlow]');
13             has 'mandate' => (is => 'ro', isa => 'Maybe[HashRef]');
14             has 'metadata' => (is => 'ro', isa => 'Maybe[HashRef[Str]|EmptyStr]');
15             has 'owner' => (is => 'ro', isa => 'Maybe[HashRef]');
16             has 'receiver' => (is => 'ro', isa => 'Maybe[HashRef]');
17             has 'redirect' => (is => 'ro', isa => 'Maybe[HashRef]');
18             has 'source_order' => (is => 'ro', isa => 'Maybe[HashRef]');
19             has 'statement_descriptor' => (is => 'ro', isa => 'Maybe[Str]');
20             has 'token' => (is => 'ro', isa => 'Maybe[StripeTokenId]');
21             has 'type' => (is => 'ro', isa => 'Maybe[StripeSourceType]');
22             has 'usage' => (is => 'ro', isa => 'Maybe[StripeSourceUsage]');
23              
24             # API response
25             has 'id' => (is => 'ro', isa => 'Maybe[StripeSourceId]');
26             has 'client_secret' => (is => 'ro', isa => 'Maybe[Str]');
27             has 'created' => (is => 'ro', isa => 'Maybe[Int]');
28             has 'livemode' => (is => 'ro', isa => 'Maybe[Bool]');
29             has 'status' => (is => 'ro', isa => 'Maybe[Str]');
30             has 'card' => (is => 'ro', isa => 'Maybe[Net::Stripe::Card]');
31              
32 2 0   2   4977 method form_fields {
  2     0   5  
  2         375  
  0            
  0            
33 0           return $self->form_fields_for(
34             qw/amount currency flow mandate metadata owner receiver redirect source_order statement_descriptor token type usage/
35             );
36             }
37              
38             __PACKAGE__->meta->make_immutable;
39             1;
40              
41             __END__
42              
43             =pod
44              
45             =head1 NAME
46              
47             Net::Stripe::Source - represent a Source object from Stripe
48              
49             =head1 VERSION
50              
51             version 0.42
52              
53             =head1 ATTRIBUTES
54              
55             =head2 amount
56              
57             Reader: amount
58              
59             Type: Maybe[Int]
60              
61             =head2 boolean_attributes
62              
63             Reader: boolean_attributes
64              
65             Type: ArrayRef[Str]
66              
67             =head2 card
68              
69             Reader: card
70              
71             Type: Maybe[Net::Stripe::Card]
72              
73             =head2 client_secret
74              
75             Reader: client_secret
76              
77             Type: Maybe[Str]
78              
79             =head2 created
80              
81             Reader: created
82              
83             Type: Maybe[Int]
84              
85             =head2 currency
86              
87             Reader: currency
88              
89             Type: Maybe[Str]
90              
91             =head2 flow
92              
93             Reader: flow
94              
95             Type: Maybe[StripeSourceFlow]
96              
97             =head2 id
98              
99             Reader: id
100              
101             Type: Maybe[StripeSourceId]
102              
103             =head2 livemode
104              
105             Reader: livemode
106              
107             Type: Maybe[Bool]
108              
109             =head2 mandate
110              
111             Reader: mandate
112              
113             Type: Maybe[HashRef]
114              
115             =head2 metadata
116              
117             Reader: metadata
118              
119             Type: Maybe[EmptyStr|HashRef[Str]]
120              
121             =head2 owner
122              
123             Reader: owner
124              
125             Type: Maybe[HashRef]
126              
127             =head2 receiver
128              
129             Reader: receiver
130              
131             Type: Maybe[HashRef]
132              
133             =head2 redirect
134              
135             Reader: redirect
136              
137             Type: Maybe[HashRef]
138              
139             =head2 source_order
140              
141             Reader: source_order
142              
143             Type: Maybe[HashRef]
144              
145             =head2 statement_descriptor
146              
147             Reader: statement_descriptor
148              
149             Type: Maybe[Str]
150              
151             =head2 status
152              
153             Reader: status
154              
155             Type: Maybe[Str]
156              
157             =head2 token
158              
159             Reader: token
160              
161             Type: Maybe[StripeTokenId]
162              
163             =head2 type
164              
165             Reader: type
166              
167             Type: Maybe[StripeSourceType]
168              
169             =head2 usage
170              
171             Reader: usage
172              
173             Type: Maybe[StripeSourceUsage]
174              
175             =head1 AUTHORS
176              
177             =over 4
178              
179             =item *
180              
181             Luke Closs
182              
183             =item *
184              
185             Rusty Conover
186              
187             =back
188              
189             =head1 COPYRIGHT AND LICENSE
190              
191             This software is copyright (c) 2015 by Prime Radiant, Inc., (c) copyright 2014 Lucky Dinosaur LLC.
192              
193             This is free software; you can redistribute it and/or modify it under
194             the same terms as the Perl 5 programming language system itself.
195              
196             =cut