File Coverage

lib/Net/API/Stripe/Payment/Method/Details.pm
Criterion Covered Total %
statement 19 31 61.2
branch n/a
condition n/a
subroutine 7 19 36.8
pod 12 12 100.0
total 38 62 61.2


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## Stripe API - ~/lib/Net/API/Stripe/Payment/Method/Details.pm
3             ## Version v1.0.0
4             ## Copyright(c) 2022 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2019/11/02
7             ## Modified 2022/10/29
8             ## All rights reserved.
9             ##
10             ##
11             ## This program is free software; you can redistribute it and/or modify it
12             ## under the same terms as Perl itself.
13             ##----------------------------------------------------------------------------
14             BEGIN
15             {
16             use strict;
17 2     2   24228229 use warnings;
  2         16  
  2         62  
18 2     2   13 use parent qw( Net::API::Stripe::Payment::Method::Options );
  2         4  
  2         60  
19 2     2   10 use vars qw( $VERSION );
  2         4  
  2         11  
20 2     2   135 our $VERSION = 'v1.0.0';
  2         4  
  2         91  
21 2     2   39 };
22              
23             use strict;
24 2     2   9 use warnings;
  2         5  
  2         53  
25 2     2   11  
  2         3  
  2         762  
26             {
27 0     0 1   bank_name => { type => "scalar" },
28             fingerprint => { type => "scalar" },
29             institution_number => { type => "scalar" },
30             last4 => { type => "scalar" },
31             mandate => { type => "scalar" },
32             transit_number => { type => "scalar" },
33             }, @_ ) ); }
34              
35             {
36             buyer_id => { type => "scalar" },
37 0     0 1   fingerprint => { type => "scalar" },
38             transaction_id => { type => "scalar" },
39             }, @_ ) ); }
40              
41              
42             {
43             expires_after => { type => "datetime" },
44 0     0 1   off_session => { package => "Net::API::Stripe::Billing::Plan", type => "object" },
45             type => { type => "scalar" },
46 0     0 1   }, @_ ) ); }
47              
48              
49             {
50             payment_method_category => { type => "scalar" },
51             preferred_locale => { type => "scalar" },
52             }, @_ ) ); }
53 0     0 1    
54             {
55 0     0 1   store => { definition => { chain => { type => "scalar" } }, type => "class" },
56             }, @_ ) ); }
57              
58              
59              
60              
61 0     0 1    
62             {
63             fingerprint => { type => "scalar" },
64             transaction_id => { type => "scalar" },
65             }, @_ ) ); }
66 0     0 1    
67             1;
68 0     0 1   # NOTE: POD
69              
70 0     0 1   =encoding utf-8
71              
72 0     0 1   =head1 NAME
73              
74 0     0 1   Net::API::Stripe::Payment::Method::Details - Stripe API
75              
76             =head1 SYNOPSIS
77              
78             use Net::API::Stripe::Payment::Method::Details;
79             my $this = Net::API::Stripe::Payment::Method::Details->new ||
80             die( Net::API::Stripe::Payment::Method::Details->error, "\n" );
81              
82             =head1 VERSION
83              
84             v1.0.0
85              
86             =head1 DESCRIPTION
87              
88             This package is called in Stripe api, but is really an alias for L<Net::API::Stripe::Payment::Method::Options> and inherits everything from it.
89              
90             =head1 AUTHOR
91              
92             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
93              
94             =head1 SEE ALSO
95              
96             L<perl>
97              
98             =head1 COPYRIGHT & LICENSE
99              
100             Copyright(c) 2022 DEGUEST Pte. Ltd.
101              
102             All rights reserved.
103              
104             This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
105              
106             =cut