File Coverage

blib/lib/Net/Braintree/CreditCardVerification.pm
Criterion Covered Total %
statement 9 16 56.2
branch n/a
condition n/a
subroutine 3 7 42.8
pod 0 4 0.0
total 12 27 44.4


line stmt bran cond sub pod time code
1             package Net::Braintree::CreditCardVerification;
2 1     1   4 use Net::Braintree::CreditCard;
  1         2  
  1         33  
3 1     1   5 use Net::Braintree::CreditCard::CardType;
  1         1  
  1         17  
4              
5 1     1   4 use Moose;
  1         1  
  1         4  
6              
7             has 'avs_error_response_code' => (is => 'ro');
8             has 'avs_postal_code_response_code' => (is => 'ro');
9             has 'avs_street_address_response_code' => (is => 'ro');
10             has 'cvv_response_code' => (is => 'ro');
11             has 'merchant_account_id' => (is => 'ro');
12             has 'processor_response_code' => (is => 'ro');
13             has 'processor_response_text' => (is => 'ro');
14             has 'id' => (is => 'ro');
15             has 'gateway_rejection_reason' => (is => 'ro');
16             has 'credit_card' => (is => 'ro');
17             has 'billing' => (is => 'ro');
18             has 'created_at' => (is => 'ro');
19             has 'status' => (is => 'ro');
20              
21             sub search {
22 0     0 0   my ($class, $block) = @_;
23 0           $class->gateway->credit_card_verification->search($block);
24             }
25              
26             sub all {
27 0     0 0   my $class = shift;
28 0           $class->gateway->credit_card_verification->all;
29             }
30              
31             sub find {
32 0     0 0   my ($class, $token) = @_;
33 0           $class->gateway->credit_card_verification->find($token);
34             }
35              
36             sub gateway {
37 0     0 0   Net::Braintree->configuration->gateway;
38             }
39              
40              
41             1;