File Coverage

lib/Net/API/Stripe/Payment/Source/Types.pm
Criterion Covered Total %
statement 19 22 86.3
branch n/a
condition n/a
subroutine 7 10 70.0
pod 3 3 100.0
total 29 35 82.8


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## Stripe API - ~/lib/Net/API/Stripe/Payment/Source/Types.pm
3             ## Version v0.1.0
4             ## Copyright(c) 2019 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2020/11/15
7             ## Modified 2020/11/15
8             ##
9             ##----------------------------------------------------------------------------
10             package Net::API::Stripe::Payment::Source::Types;
11             BEGIN
12             {
13 1     1   1041 use strict;
  1         2  
  1         32  
14 1     1   6 use warnings;
  1         2  
  1         31  
15 1     1   6 use parent qw( Net::API::Stripe::Generic );
  1         1  
  1         6  
16 1     1   73 use vars qw( $VERSION );
  1         3  
  1         49  
17 1     1   35 our( $VERSION ) = 'v0.1.0';
18             };
19              
20 1     1   7 use strict;
  1         4  
  1         22  
21 1     1   6 use warnings;
  1         3  
  1         126  
22              
23 0     0 1   sub bank_account { return( shift->_set_get_number( 'bank_account', @_ ) ); }
24              
25 0     0 1   sub card { return( shift->_set_get_number( 'card', @_ ) ); }
26              
27 0     0 1   sub fpx { return( shift->_set_get_number( 'fpx', @_ ) ); }
28              
29             1;
30              
31             __END__
32              
33             =encoding utf8
34              
35             =head1 NAME
36              
37             Net::API::Stripe::Payment::Source::Types - Payment Source Types
38              
39             =head1 SYNOPSIS
40              
41             my $types = $stripe->payment->source->types({
42             bank_account => 1000000,
43             card => 1000,
44             fpx => 0,
45             });
46              
47             =head1 VERSION
48              
49             v0.100.0
50              
51             =head1 DESCRIPTION
52              
53             This is called from L<Net::API::Stripe::Balance::ConnectReserved> and L<Net::API::Stripe::Balance::Pending>
54              
55             =head1 CONSTRUCTOR
56              
57             =head2 new( %ARG )
58              
59             Creates a new L<Net::API::Stripe::Payment::Source::Types> object.
60             It may also take an hash like arguments, that also are method of the same name.
61              
62             =head1 METHODS
63              
64             =head2 bank_account integer
65              
66             Amount for bank account.
67              
68             =head2 card integer
69              
70             Amount for card.
71              
72             =head2 fpx integer
73              
74             Amount for FPX.
75              
76             =head1 API SAMPLE
77              
78             {
79             "object": "balance",
80             "available": [
81             {
82             "amount": 0,
83             "currency": "jpy",
84             "source_types": {
85             "card": 0
86             }
87             }
88             ],
89             "connect_reserved": [
90             {
91             "amount": 0,
92             "currency": "jpy"
93             }
94             ],
95             "livemode": false,
96             "pending": [
97             {
98             "amount": 7712,
99             "currency": "jpy",
100             "source_types": {
101             "card": 7712
102             }
103             }
104             ]
105             }
106              
107             =head1 HISTORY
108              
109             =head2 v0.1
110              
111             Initial version
112              
113             =head1 AUTHOR
114              
115             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
116              
117             =head1 SEE ALSO
118              
119             Stripe API documentation:
120              
121             L<https://stripe.com/docs/api>
122              
123             =head1 COPYRIGHT & LICENSE
124              
125             Copyright (c) 2019-2020 DEGUEST Pte. Ltd.
126              
127             You can use, copy, modify and redistribute this package and associated files under the same terms as Perl itself.
128              
129             =cut