File Coverage

blib/lib/Net/API/Stripe/Issuing/Dispute/Evidence/Fraudulent.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 5 60.0
pod 2 2 100.0
total 12 16 75.0


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## Stripe API - ~/lib/Net/API/Stripe/Issuing/Dispute/Evidence/Fraudulent.pm
3             ## Version v0.100.0
4             ## Copyright(c) 2019 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <@sitael.tokyo.deguest.jp>
6             ## Created 2019/11/02
7             ## Modified 2020/05/15
8             ##
9             ##----------------------------------------------------------------------------
10             package Net::API::Stripe::Issuing::Dispute::Evidence::Fraudulent;
11             BEGIN
12             {
13 1     1   863 use strict;
  1         2  
  1         38  
14 1     1   5 use parent qw( Net::API::Stripe::Generic );
  1         2  
  1         4  
15 1     1   115 our( $VERSION ) = 'v0.100.0';
16             };
17              
18 0     0 1   sub dispute_explanation { return( shift->_set_get_scalar( 'dispute_explanation', @_ ) ); }
19              
20 0     0 1   sub uncategorized_file { return( shift->_set_get_scalar_or_object( 'uncategorized_file', 'Net::API::Stripe::File', @_ ) ); }
21              
22             1;
23              
24             __END__
25              
26             =encoding utf8
27              
28             =head1 NAME
29              
30             Net::API::Stripe::Issuing::Dispute::Evidence::Fraudulent - A Stripe Issued Card Evidence Object
31              
32             =head1 SYNOPSIS
33              
34             my $fraud = $stripe->issuing_dispute->evidence->fraudulent({
35             dispute_explanation => 'Service not provided',
36             uncategorized_file => $file_object,
37             });
38              
39             =head1 VERSION
40              
41             v0.100.0
42              
43             =head1 DESCRIPTION
44              
45             Evidence to support a fraudulent dispute. This will only be present if your dispute’s reason is fraudulent.
46              
47             This is instantiated by method B<fraudulent> in module L<Net::API::Stripe::Issuing::Dispute>
48              
49             =head1 CONSTRUCTOR
50              
51             =over 4
52              
53             =item B<new>( %ARG )
54              
55             Creates a new L<Net::API::Stripe::Issuing::Dispute::Evidence::Fraudulent> object.
56             It may also take an hash like arguments, that also are method of the same name.
57              
58             =back
59              
60             =head1 METHODS
61              
62             =over 4
63              
64             =item B<dispute_explanation> string
65              
66             Brief freeform text explaining why you are disputing this transaction.
67              
68             =item B<uncategorized_file> string (expandable)
69              
70             (ID of a file upload) Additional file evidence supporting your dispute.
71              
72             When expanded, this is a L<Net::API::Stripe::File> object.
73              
74             =back
75              
76             =head1 API SAMPLE
77              
78             {
79             "id": "idp_fake123456789",
80             "object": "issuing.dispute",
81             "amount": 100,
82             "created": 1571480456,
83             "currency": "usd",
84             "disputed_transaction": "ipi_fake123456789",
85             "evidence": {
86             "fraudulent": {
87             "dispute_explanation": "Fraud; card reported lost on 10/19/2019",
88             "uncategorized_file": null
89             },
90             "other": null
91             },
92             "livemode": false,
93             "metadata": {},
94             "reason": "fraudulent",
95             "status": "under_review"
96             }
97              
98             =head1 HISTORY
99              
100             =head2 v0.1
101              
102             Initial version
103              
104             =head1 AUTHOR
105              
106             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
107              
108             =head1 SEE ALSO
109              
110             Stripe API documentation:
111              
112             L<https://stripe.com/docs/api/issuing/disputes>, L<https://stripe.com/docs/issuing/disputes>
113              
114             =head1 COPYRIGHT & LICENSE
115              
116             Copyright (c) 2019-2020 DEGUEST Pte. Ltd.
117              
118             You can use, copy, modify and redistribute this package and associated
119             files under the same terms as Perl itself.
120              
121             =cut