File Coverage

lib/Net/API/Stripe/Exception.pm
Criterion Covered Total %
statement 10 11 90.9
branch n/a
condition n/a
subroutine 4 5 80.0
pod 1 1 100.0
total 15 17 88.2


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## Stripe API - ~/lib/HTTP/Promise/Exception.pm
3             ## Version v0.1.0
4             ## Copyright(c) 2022 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2022/10/18
7             ## Modified 2022/10/18
8             ## All rights reserved
9             ##
10             ## This program is free software; you can redistribute it and/or modify it
11             ## under the same terms as Perl itself.
12             ##----------------------------------------------------------------------------
13             package Net::API::Stripe::Exception;
14             BEGIN
15             {
16 1     1   1021 use strict;
  1         2  
  1         30  
17 1     1   4 use warnings;
  1         2  
  1         37  
18 1     1   5 use parent qw( Module::Generic::Exception );
  1         2  
  1         5  
19 1     1   168 our $VERSION = 'v0.1.0';
20             };
21              
22 0     0 1   sub request_log_url { return( shift->_set_get_uri( 'request_log_url', @_ ) ); }
23              
24             1;
25             # NOTE: POD
26             __END__
27              
28             =encoding utf-8
29              
30             =head1 NAME
31              
32             Net::API::Stripe::Exception - Stripe Exception
33              
34             =head1 SYNOPSIS
35              
36             use Net::API::Stripe::Exception;
37             my $this = Net::API::Stripe::Exception->new( $error_message ) ||
38             die( Net::API::Stripe::Exception->error, "\n" );
39              
40             =head1 VERSION
41              
42             v0.1.0
43              
44             =head1 DESCRIPTION
45              
46             This class inherits all its methods from L<Module::Generic::Exception>
47              
48             =head1 METHODS
49              
50             Please see L<Module::Generic::Exception> for details.
51              
52             =head2 request_log_url
53              
54             The uri in the dashboard to get details about the error that occurred.
55              
56             =head1 AUTHOR
57              
58             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
59              
60             =head1 SEE ALSO
61              
62             L<Module::Generic::Exception>
63              
64             L<Net::API::Stripe>
65              
66             =head1 COPYRIGHT & LICENSE
67              
68             Copyright(c) 2022 DEGUEST Pte. Ltd.
69              
70             All rights reserved.
71              
72             This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
73              
74             =cut