File Coverage

lib/Net/API/Stripe/Payment/Source/ACHDebit.pm
Criterion Covered Total %
statement 19 26 73.0
branch n/a
condition n/a
subroutine 7 14 50.0
pod 7 7 100.0
total 33 47 70.2


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## Stripe API - ~/lib/Net/API/Stripe/Payment/Source/ACHDebit.pm
3             ## Version v0.100.0
4             ## Copyright(c) 2019 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2019/11/02
7             ## Modified 2020/05/15
8             ##
9             ##----------------------------------------------------------------------------
10             package Net::API::Stripe::Payment::Source::ACHDebit;
11             BEGIN
12             {
13 1     1   1045 use strict;
  1         3  
  1         35  
14 1     1   5 use warnings;
  1         2  
  1         33  
15 1     1   6 use parent qw( Net::API::Stripe::Generic );
  1         2  
  1         5  
16 1     1   69 use vars qw( $VERSION );
  1         2  
  1         65  
17 1     1   23 our( $VERSION ) = 'v0.100.0';
18             };
19              
20 1     1   6 use strict;
  1         3  
  1         32  
21 1     1   6 use warnings;
  1         2  
  1         206  
22              
23 0     0 1   sub account_holder_type { return( shift->_set_get_scalar( 'account_holder_type', @_ ) ); }
24              
25 0     0 1   sub bank_name { return( shift->_set_get_scalar( 'bank_name', @_ ) ); }
26              
27 0     0 1   sub country { return( shift->_set_get_scalar( 'country', @_ ) ); }
28              
29 0     0 1   sub fingerprint { return( shift->_set_get_scalar( 'fingerprint', @_ ) ); }
30              
31 0     0 1   sub last4 { return( shift->_set_get_scalar( 'last4', @_ ) ); }
32              
33 0     0 1   sub routing_number { return( shift->_set_get_scalar( 'routing_number', @_ ) ); }
34              
35 0     0 1   sub type { return( shift->_set_get_scalar( 'type', @_ ) ); }
36              
37             1;
38              
39             __END__
40              
41             =encoding utf8
42              
43             =head1 NAME
44              
45             Net::API::Stripe::Payment::Source::ACHDebit - A Stripe ACH Debit Object
46              
47             =head1 SYNOPSIS
48              
49             my $ach_debit = $stripe->source->ach_debit({
50             account_holder_type => 'company',
51             bank_name => 'Big Buck, Corp',
52             country => 'us',
53             fingerprint => 'hskfhskjhajl',
54             last4 => 1234,
55             routing_number => undef,
56             });
57              
58             =head1 VERSION
59              
60             v0.100.0
61              
62             =head1 DESCRIPTION
63              
64             This module contains a snapshot of the transaction specific details of the ach_debit payment method.
65              
66             This is instantiated by method B<ach_debit> in module L<Net::API::Stripe::Payment::Method::Details> and L<Net::API::Stripe::Payment::Source>
67              
68             =head1 CONSTRUCTOR
69              
70             =head2 new( %ARG )
71              
72             Creates a new L<Net::API::Stripe::Payment::Source::ACHDebit> object.
73             It may also take an hash like arguments, that also are method of the same name.
74              
75             =head1 METHODS
76              
77             =head2 account_holder_type string
78              
79             Type of entity that holds the account. This can be either individual or company.
80              
81             =head2 bank_name string
82              
83             Name of the bank associated with the bank account.
84              
85             =head2 country string
86              
87             Two-letter ISO code representing the country the bank account is located in.
88              
89             =head2 fingerprint string
90              
91             Uniquely identifies this particular bank account. You can use this attribute to check whether two bank accounts are the same.
92              
93             =head2 last4 string
94              
95             Last four digits of the bank account number.
96              
97             =head2 routing_number string
98              
99             Routing transit number of the bank account.
100              
101             =head1 HISTORY
102              
103             =head2 v0.1
104              
105             Initial version
106              
107             =head1 AUTHOR
108              
109             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
110              
111             =head1 SEE ALSO
112              
113             Stripe API documentation:
114              
115             L<https://stripe.com/docs/api/payment_methods/object>
116              
117             =head1 COPYRIGHT & LICENSE
118              
119             Copyright (c) 2019-2020 DEGUEST Pte. Ltd.
120              
121             You can use, copy, modify and redistribute this package and associated
122             files under the same terms as Perl itself.
123              
124             =cut