Branch Coverage

blib/lib/Business/OnlinePayment/Capstone.pm
Criterion Covered Total %
branch 2 36 5.5


line true false branch
29 0 0 if ($$self{'_content'}{'action'} =~ /^\s*normal\s*authorization\s*$/i) { }
0 0 elsif ($$self{'_content'}{'action'} =~ /^\s*authorization\s*only\s*$/i) { }
0 0 elsif ($$self{'_content'}{'action'} =~ /^\s*post\s*authorization\s*$/i) { }
0 0 elsif ($$self{'_content'}{'action'} =~ /^\s*void\s*$/i) { }
0 0 elsif ($$self{'_content'}{'action'} =~ /^\s*credit\s*$/i) { }
81 0 0 if ($action =~ /^auth(postauth)?$/) { }
0 0 elsif ($action =~ /^(postauth|void|return)$/) { }
90 0 0 unless $$self{'_content'}{'expiration'} =~ /^(\d+)\D+\d*(\d{2})$/
93 0 0 if $month =~ /^\d$/
96 0 0 if ($$self{'_content'}{'card_start'})
97 0 0 unless $$self{'_content'}{'card_start'} =~ /^(\d+)\D+\d*(\d{2})$/
100 0 0 if $month =~ /^\d$/
144 0 0 if $Business::OnlinePayment::Capstone::DEBUG
162 0 0 unless /^(\w+)=(.*)$/
172 0 0 if ($result{'status'} eq 'good') { }
0 0 elsif ($result{'status'} =~ /^(bad|error|fraud)$/) { }
180 0 0 $Business::OnlinePayment::Capstone::DEBUG ? :
194 4 32 ref $map{$_} ? :