Branch Coverage

blib/lib/Net/TPP.pm
Criterion Covered Total %
branch 16 80 20.0


line true false branch
17 0 3 if ($new_option_key ne $option_key)
25 3 0 $options{$_} ? :
60 0 1 unless ($$self{'_mode_map'}{$mode})
70 0 0 if ($new_option_key ne $option_key)
77 1 0 if ($mode eq 'AUTHENTICATION')
79 3 0 if not $options{$_} and $$self{$_}
82 0 1 if ($mode ne 'AUTHENTICATION' and not $options{'SessionID'})
83 0 0 unless ($$self{'SessionID'})
85 0 0 unless $self->login
90 3 0 $options{$_} ? :
91 0 1 if (@missing_parameters)
103 1 0 unless $response
106 0 0 if $mode eq 'AUTHENTICATION' and not $$self{'SessionID'} and $$response{'output_string'}
114 0 3 if ($option_key eq lc $option_key)
128 3 0 defined $options{'key'} ? :
129 0 3 if (ref $options{'value'} and ref $options{'value'} eq 'ARRAY') { }
3 0 elsif (not ref $options{'value'}) { }
142 3 1 $_ ne 'url' ? :
147 0 1 if ($res->is_success) { }
149 0 0 defined $options{$_} ? :
152 0 0 if $value_prefixes
154 0 0 if ($res->content =~ /^($value_prefixes:\s)?(?OK|ERR):\s*(?.*)/s) { }
157 0 0 if ($output{'status'} eq 'ERR') { }
187 0 0 if ($output_line =~ /^(?\S+):\s*(?OK|ERR):\s*(?.*)/s) { }
0 0 elsif ($output_line =~ /^(?[^\s\=]+)=(?.*)/) { }
0 0 elsif ($output_line =~ /^OK:\s*$/) { }
0 0 elsif (not $output =~ /[\r\n]/ and $output_line =~ /^OK: (.+)$/) { }
190 0 0 if ($status eq 'ERR' and $value =~ s/^(\d\d\d)\b(,\s+)?//) { }
206 0 0 if ($output =~ /[\r\n]/s) { }
213 0 0 if (scalar keys %output_hash == 1)
221 0 0 if (defined $hashref and $hashref) { }
222 0 0 if (ref $hashref eq 'ARRAY') { }
228 0 0 if defined $value and $value ne ''
230 0 0 if (scalar keys %options)
231 0 0 unless (ref $hashref)
244 0 0 if ($value =~ /&[^\&]+=/) { }
0 0 elsif ($value =~ /^(?[^=]+)=(?.*)/) { }
390 0 0 if ($this_domain)
392 0 0 if ($domain_details and $$domain_details{'output'} and defined $$domain_details{'output'}{'LockStatus'} and $$domain_details{'output'}{'LockStatus'} == 2)
402 0 0 if ($domain_locked)