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