File Coverage

blib/lib/Net/Braintree/SubscriptionSearch.pm
Criterion Covered Total %
statement 6 7 85.7
branch n/a
condition n/a
subroutine 2 3 66.6
pod 0 1 0.0
total 8 11 72.7


line stmt bran cond sub pod time code
1             package Net::Braintree::SubscriptionSearch;
2 1     1   3 use Moose;
  1         2  
  1         4  
3 1     1   3814 use Net::Braintree::AdvancedSearch qw(search_to_hash);
  1         1  
  1         138  
4             my $meta = __PACKAGE__->meta();
5              
6             my $field = Net::Braintree::AdvancedSearchFields->new(metaclass => $meta);
7              
8             $field->text("id");
9             $field->text("transaction_id");
10             $field->text("plan_id");
11              
12             $field->multiple_values("in_trial_period");
13             $field->multiple_values("status", Net::Braintree::Subscription::Status::All);
14             $field->multiple_values("merchant_account_id");
15             $field->multiple_values("ids");
16              
17             $field->range("price");
18             $field->range("days_past_due");
19             $field->range("billing_cycles_remaining");
20             $field->range("next_billing_date");
21              
22             sub to_hash {
23 0     0 0   Net::Braintree::AdvancedSearch->search_to_hash(shift);
24             }
25              
26             1;