Condition Coverage

blib/lib/Net/TPP.pm
Criterion Covered Total %
condition 9 63 14.2


and 3 conditions

line !l l&&!r l&&r condition
79 0 0 3 not $options{$_} and $$self{$_}
82 1 0 0 $mode ne 'AUTHENTICATION' and not $options{'SessionID'}
106 0 0 0 $mode eq 'AUTHENTICATION' and not $$self{'SessionID'}
0 0 0 $mode eq 'AUTHENTICATION' and not $$self{'SessionID'} and $$response{'output_string'}
129 3 0 0 ref $options{'value'} and ref $options{'value'} eq 'ARRAY'
187 0 0 0 not $output =~ /[\r\n]/ and $output_line =~ /^OK: (.+)$/
190 0 0 0 $status eq 'ERR' and $value =~ s/^(\d\d\d)\b(,\s+)?//
221 0 0 0 defined $hashref and $hashref
228 0 0 0 defined $value and $value ne ''
392 0 0 0 $domain_details and $$domain_details{'output'}
0 0 0 $domain_details and $$domain_details{'output'} and defined $$domain_details{'output'}{'LockStatus'}
0 0 0 $domain_details and $$domain_details{'output'} and defined $$domain_details{'output'}{'LockStatus'} and $$domain_details{'output'}{'LockStatus'} == 2

or 2 conditions

line l !l condition
26 0 1 $options{'URL'} || 'https://theconsole.tppwholesale.com.au'
29 0 1 $options{'AuthURL'} || '/api/auth.pl'
33 0 1 $options{'UserAgent'} || 'Mozilla/5.0 (Net::TPP perl/LWP)'
43 2 0 $$self{'error'} || ''
130 0 0 $options{'delimiter'} || '&'
134 0 0 $options{'key'} || ''
161 0 0 $$self{'_error_codes'}{$$self{'error_code'}} || 'Unknown Error.'
232 0 0 $hashref || ''
238 0 0 $hashref || ''

or 3 conditions

line l !l&&r !l&&!r condition
32 0 1 0 $$self{'_ua'} ||= 'LWP::UserAgent'->new
53 1 0 0 uc $options{'mode'} || uc $options{'Mode'} || do { $$self{'error_code'} = ''; $$self{'error'} = 'No mode passed in'; $$self{'error_output'} = ''; return }
389 0 0 0 $options{'Domain'} || $options{'domain'}