File Coverage

blib/lib/WebService/Braintree/CreditCardVerificationSearch.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 0 1 0.0
total 12 15 80.0


line stmt bran cond sub pod time code
1             package WebService::Braintree::CreditCardVerificationSearch;
2             $WebService::Braintree::CreditCardVerificationSearch::VERSION = '0.93';
3 1     1   32 use Moose;
  1         4  
  1         7  
4 1     1   7938 use WebService::Braintree::CreditCard::CardType;
  1         3  
  1         52  
5 1     1   8 use WebService::Braintree::AdvancedSearch;
  1         2  
  1         181  
6              
7              
8             my $field = WebService::Braintree::AdvancedSearchFields->new(metaclass => __PACKAGE__->meta);
9             $field->text("id");
10             $field->text("credit_card_cardholder_name");
11             $field->equality("credit_card_expiration_date");
12             $field->partial_match("credit_card_number");
13             $field->multiple_values("ids");
14              
15             $field->multiple_values("credit_card_card_type", @{WebService::Braintree::CreditCard::CardType::All()});
16              
17             $field->range("created_at");
18              
19             sub to_hash {
20 0     0 0   WebService::Braintree::AdvancedSearch->search_to_hash(shift);
21             }
22              
23             __PACKAGE__->meta->make_immutable;
24             1;
25