| line |
true |
false |
branch |
|
38
|
1 |
20 |
if (ref $_[0] eq 'HASH') { } |
|
47
|
15 |
6 |
defined $user_params ? : |
|
53
|
6 |
19 |
unless defined $params->{$key} |
|
68
|
1 |
23 |
if (defined $params->{'-d'} and defined $params->{'-f'}) |
|
73
|
1 |
23 |
if defined $params->{'-E'} |
|
74
|
1 |
22 |
if defined $params->{'-t'} |
|
75
|
1 |
21 |
if defined $params->{'-v'} |
|
78
|
2 |
19 |
if (defined $params->{'-w'}) |
|
82
|
2 |
19 |
if (defined $params->{'-W'}) |
|
97
|
28 |
2 |
if (defined $path) { } |
|
99
|
22 |
6 |
if -e $cmd |
|
104
|
1 |
1 |
if not $@ and $? == 0 |
|
116
|
1 |
33 |
if $self->{'ffi_warn'} and not $self->{'ffi'} |
|
117
|
19 |
15 |
unless $self->{'ffi'} |
|
122
|
7 |
2 |
$_ eq '-f' ? : |
|
124
|
2 |
13 |
if $self->{'ffi_warn'} and @params |
|
125
|
4 |
11 |
if @params |
|
128
|
1 |
10 |
if $self->{'ffi_warn'} and not $ctx |
|
129
|
2 |
9 |
unless $ctx |
|
135
|
1 |
8 |
if $self->{'ffi_warn'} and not $pj |
|
136
|
2 |
7 |
if not $pj |
|
143
|
2 |
23 |
if $self->{'ffi_pj'} |
|
144
|
2 |
23 |
if $self->{'ffi_ctx'} |
|
153
|
17 |
4 |
if (ref $self) |
|
158
|
1 |
20 |
if length $stderr |
|
159
|
1 |
20 |
if $code == -1 |
|
160
|
0 |
20 |
if $code & 127 |
|
161
|
2 |
18 |
if $code |
|
162
|
0 |
18 |
if $eval_err |
|
169
|
56 |
4 |
if &looks_like_number($value) |
|
177
|
4 |
16 |
if $self->{'ffi'} |
|
198
|
1 |
17 |
unless $line =~ /\s(\d+)\s*$/ax |
|
200
|
1 |
16 |
unless $line =~ /^\s* (\S+) \s+ (\S+) \s+ (\S+) \s/ax |
|
201
|
1 |
15 |
defined $aux ? : |
|
204
|
38 |
10 |
if &looks_like_number($p[$j]) |
|
210
|
3 |
12 |
if ((my $s = @source_points) != (my $t = @target_points)) |
|
214
|
3 |
9 |
if wantarray |
|
215
|
8 |
1 |
if @target_points < 2 |
|
226
|
3 |
5 |
unless defined $p->[3] |
|
230
|
1 |
3 |
if wantarray |
|
231
|
2 |
1 |
if @target_points < 2 |
|
239
|
2 |
4 |
ref $self ? : |
|
240
|
1 |
5 |
if $ffi |
|
248
|
2 |
1 |
if $out =~ /\b(\d+\.\d+(?:\.\d\w*)?)\b/u |