File Coverage

lib/WebService/Braintree/TransparentRedirect.pm
Criterion Covered Total %
statement 8 23 34.7
branch n/a
condition n/a
subroutine 3 11 27.2
pod 7 8 87.5
total 18 42 42.8


line stmt bran cond sub pod time code
1             package WebService::Braintree::TransparentRedirect;
2             $WebService::Braintree::TransparentRedirect::VERSION = '0.94';
3 20     20   394 use 5.010_001;
  20         74  
4 20     20   108 use strictures 1;
  20         142  
  20         739  
5              
6             =head1 NAME
7              
8             WebService::Braintree::TransparentRedirect
9              
10             =head1 PURPOSE
11              
12             This class generates and manages the transparent redirects.
13              
14             =head1 EXPLANATION
15              
16             TODO
17              
18             =cut
19              
20 20     20   2280 use Moose;
  20         45  
  20         133  
21              
22             =head1 CLASS METHODS
23              
24             =head2 confirm()
25              
26             This takes a query string and returns whatever confirm() returns.
27              
28             =cut
29              
30             sub confirm {
31 0     0 1   my($class, $query_string) = @_;
32 0           $class->gateway->transparent_redirect->confirm($query_string);
33             }
34              
35             =head2 transaction_data()
36              
37             This takes a hashref of params and returns whatever transaction_data() returns.
38              
39             =cut
40              
41             sub transaction_data {
42 0     0 1   my ($class, $params) = @_;
43 0           $class->gateway->transparent_redirect->transaction_data($params);
44             }
45              
46             =head2 create_customer_data()
47              
48             This takes a hashref of params and returns whatever create_customer_data() returns.
49              
50             =cut
51              
52             sub create_customer_data {
53 0     0 1   my ($class, $params) = @_;
54 0           $class->gateway->transparent_redirect->create_customer_data($params);
55             }
56              
57             =head2 update_customer_data()
58              
59             This takes a hashref of params and returns whatever update_customer_data() returns.
60              
61             =cut
62              
63             sub update_customer_data {
64 0     0 1   my ($class, $params) = @_;
65 0           $class->gateway->transparent_redirect->update_customer_data($params);
66             }
67              
68             =head2 create_credit_card_data()
69              
70             This takes a hashref of params and returns whatever create_credit_card_data() returns.
71              
72             =cut
73              
74             sub create_credit_card_data {
75 0     0 1   my ($class, $params) = @_;
76 0           $class->gateway->transparent_redirect->create_credit_card_data($params);
77             }
78              
79             =head2 update_credit_card_data()
80              
81             This takes a hashref of params and returns whatever update_credit_card_data() returns.
82              
83             =cut
84              
85             sub update_credit_card_data {
86 0     0 1   my ($class, $params) = @_;
87 0           $class->gateway->transparent_redirect->update_credit_card_data($params);
88             }
89              
90             =head2 url()
91              
92             This takes no parameters and returns whatever url() returns.
93              
94             =cut
95              
96             sub url {
97 0     0 1   my $class = shift;
98 0           $class->gateway->transparent_redirect->url;
99             }
100              
101             sub gateway {
102 0     0 0   WebService::Braintree->configuration->gateway;
103             }
104              
105             __PACKAGE__->meta->make_immutable;
106              
107             1;
108             __END__
109              
110             =head1 TODO
111              
112             =over 4
113              
114             =item Need to document the required and optional input parameters
115              
116             =item Need to document the possible errors/exceptions
117              
118             =back
119              
120             =cut