line |
true |
false |
branch |
35
|
0 |
0 |
if ($_[0] =~ /^\-/o) |
37
|
0 |
0 |
!defined($_[0]) || $_[0] =~ /^\-/ ? : |
44
|
0 |
0 |
if (defined $$self{"-$source"} and ref($$self{"-$source"}) =~ /HASH/) |
47
|
0 |
0 |
if ($subarglist[0] =~ /^\-/o) |
49
|
0 |
0 |
!defined($subarglist[0]) || $subarglist[0] =~ /^\-/ ? : |
56
|
0 |
0 |
unless defined $self->{'-debug'} and $self->{'-debug'} =~ /^\d$/ |
66
|
0 |
0 |
if $self->{'-debug'} |
71
|
0 |
0 |
wantarray ? : |
86
|
0 |
0 |
wantarray ? : |
95
|
0 |
0 |
wantarray ? : |
111
|
0 |
0 |
if (defined $_[0]) { } |
120
|
0 |
0 |
if (defined $_[0]) { } |
139
|
0 |
0 |
unless ($_[0] and $_[1]) |
177
|
0 |
0 |
if ($res->is_success) { } |
182
|
0 |
0 |
if ($res->status_line =~ /^404/) { } |
239
|
0 |
0 |
unless $str =~ /\n$/s |
241
|
0 |
0 |
if $^O =~ /Win/ |