| line |
true |
false |
branch |
|
23
|
7 |
1 |
if exists $_[0]{'enable_xdg'} |
|
29
|
1 |
1 |
if $name =~ /^::/ |
|
36
|
5 |
9 |
if (my $p = $$args{'plugins'}) { } |
|
37
|
2 |
3 |
unless ref $p and ref $p eq 'ARRAY' |
|
41
|
2 |
1 |
unless (blessed $ret) |
|
43
|
1 |
1 |
if (ref $ret eq 'HASH') |
|
65
|
1 |
11 |
unless $action |
|
67
|
8 |
3 |
if ($action =~ /^$verb_regex$/) { } |
|
|
0 |
3 |
elsif ($action eq 'exports') { } |
|
74
|
5 |
3 |
unless $ARGV[0] and $ARGV[0] =~ /^-/ |
|
75
|
3 |
5 |
unless $ARGV[0] and $ARGV[0] =~ /^-/ |
|
89
|
2 |
6 |
if $action =~ /^(?:PUT|POST|TRACE|PATCH)$/ |
|
90
|
1 |
7 |
if ($wantdata and $interactive_edit) |
|
100
|
2 |
6 |
if $data |
|
101
|
1 |
7 |
if $action eq 'HEAD' |
|
106
|
7 |
1 |
if $quote |
|
110
|
2 |
6 |
if $query |
|
120
|
1 |
7 |
if $self->verbose |
|
144
|
1 |
7 |
if ($_[0]->enable_xdg and $ENV{'XDG_CONFIG_HOME'}) { } |
|
152
|
0 |
8 |
unless -d $ret->stringify |
|
180
|
1 |
7 |
if ($self->verbose) |
|
186
|
0 |
8 |
unless $out =~ /\n\Z/m |
|
188
|
1 |
7 |
if $http_code == 2 |
|
197
|
3 |
12 |
if ($base) { } |
|
198
|
2 |
1 |
unless $base =~ /\*/ |
|
199
|
1 |
2 |
unless $base =~ m[^https?://] |
|
212
|
0 |
0 |
unless -f $file->stringify |
|
220
|
0 |
0 |
unless -f $file->stringify |
|
229
|
0 |
0 |
unless -f $file->stringify |
|
254
|
0 |
8 |
unless -f $path->stringify |
|
263
|
0 |
0 |
unless -f $file->stringify |
|
270
|
16 |
8 |
/^\s*($verb_regex)\s+(.*)/ ? : |
|
276
|
7 |
1 |
if (my $ret = $config{$method}) |