| line |
true |
false |
branch |
|
29
|
0 |
30 |
if ($@) |
|
37
|
30 |
0 |
if (@_) |
|
38
|
12 |
18 |
if (ref $_[0] eq 'HASH') { } |
|
41
|
2 |
15 |
unless _check_config_keys($_) |
|
42
|
2 |
8 |
if (@_) |
|
47
|
16 |
10 |
if (@_) |
|
48
|
4 |
12 |
if (ref $_[0] ne "HASH") |
|
51
|
0 |
89 |
unless _check_config_keys($_) |
|
54
|
2 |
20 |
unless (-d $build_dir) |
|
58
|
10 |
10 |
$config_options->{'AUTOWRAP'} ? : |
|
62
|
2 |
4 |
if (exists $config_options->{'CODE'} and exists $config_options->{'SRC_LOCATION'}) |
|
66
|
0 |
2 |
if (exists $config_options->{'BOOT'} and exists $config_options->{'BOOT_F'}) |
|
70
|
4 |
14 |
if (exists $config_options->{'CODE'}) { } |
|
|
4 |
10 |
elsif (exists $config_options->{'SRC_LOCATION'}) { } |
|
72
|
0 |
4 |
if ($code =~ /inline_stack_vars/i) |
|
75
|
2 |
2 |
unless open RD, "<", $config_options->{'SRC_LOCATION'} |
|
78
|
0 |
4 |
if ($_ =~ /inline_stack_vars/i) |
|
80
|
0 |
2 |
unless close RD |
|
83
|
0 |
10 |
unless open RD, "<", "src/$modfname.c" |
|
86
|
4 |
912 |
if ($_ =~ /inline_stack_vars/i) |
|
88
|
0 |
10 |
unless close RD |
|
136
|
0 |
16 |
if (exists $config_options->{'PROTOTYPE'}) |
|
138
|
0 |
16 |
if (exists $config_options->{'PROTOTYPES'}) |
|
140
|
2 |
14 |
if (exists $config_options->{'BUILD_NOISY'}) |
|
142
|
0 |
16 |
if (exists $config_options->{'_TESTING'}) |
|
144
|
10 |
6 |
if ($config_options->{'AUTOWRAP'}) |
|
146
|
2 |
14 |
if ($config_options->{'BOOT'}) |
|
148
|
1 |
15 |
if ($config_options->{'DIST'}) |
|
155
|
0 |
16 |
if ($config_options->{'BOOT_F'}) |
|
157
|
0 |
0 |
unless open RD, "<", $config_options->{'BOOT_F'} |
|
160
|
0 |
0 |
if ($_ =~ /inline_stack_vars/i) |
|
162
|
0 |
0 |
unless close RD |
|
168
|
2 |
14 |
if ($config_options->{'MAKE'}) |
|
170
|
12 |
4 |
if (exists $config_options->{'TYPEMAPS'}) { } |
|
172
|
9 |
3 |
if (ref $val eq 'ARRAY') { } |
|
174
|
2 |
7 |
unless -f $_ |
|
181
|
0 |
3 |
unless -f $_ |
|
192
|
2 |
12 |
if ($config_options->{'LIBS'}) |
|
196
|
2 |
12 |
if ($config_options->{'PREFIX'}) |
|
202
|
2 |
12 |
if ($config_options->{'PRE_HEAD'}) |
|
206
|
1 |
1 |
if (-f $v) { } |
|
211
|
0 |
1 |
unless open RD, "<", $v |
|
213
|
0 |
1 |
unless close RD |
|
219
|
10 |
4 |
if ($config_options->{'AUTO_INCLUDE'}) |
|
221
|
2 |
12 |
if ($config_options->{'CC'}) |
|
223
|
2 |
12 |
if ($config_options->{'OBJECT'}) |
|
225
|
2 |
12 |
if ($config_options->{'CCFLAGS'}) |
|
227
|
0 |
14 |
if ($config_options->{'CCFLAGSEX'}) |
|
230
|
10 |
4 |
if (exists $config_options->{'INC'}) { } |
|
231
|
0 |
10 |
if (ref $config_options->{'INC'} eq 'ARRAY') { } |
|
238
|
2 |
12 |
if ($config_options->{'LD'}) |
|
240
|
1 |
13 |
if ($config_options->{'PREREQ_PM'}) |
|
242
|
2 |
12 |
if ($config_options->{'LDDLFLAGS'}) |
|
246
|
2 |
12 |
if ($config_options->{'MAKE'}) |
|
248
|
2 |
12 |
if ($config_options->{'MYEXTLIB'}) |
|
250
|
2 |
12 |
if ($config_options->{'OPTIMIZE'}) |
|
252
|
5 |
9 |
if ($config_options->{'USING'}) |
|
254
|
4 |
1 |
if (ref $val eq 'ARRAY') { } |
|
263
|
2 |
12 |
unless ($need_inline_h) |
|
267
|
3 |
11 |
if ($config_options->{'WRITE_MAKEFILE_PL'}) |
|
270
|
3 |
0 |
if ($config_options->{'VERSION'}) { } |
|
276
|
4 |
10 |
if ($config_options->{'WRITE_PM'}) |
|
277
|
4 |
0 |
if ($config_options->{'VERSION'}) { } |
|
285
|
1 |
13 |
if ($config_options->{'MANIF'}) |
|
289
|
1 |
13 |
if ($config_options->{'T'}) |
|
306
|
12 |
2 |
if ($need_inline_headers) |
|
316
|
104 |
1426 |
if $_ eq $_[0] |
|
330
|
3 |
1 |
if ($config_options->{'USE'}) |
|
332
|
0 |
3 |
if ref $config_options->{'USE'} ne "ARRAY" |
|
336
|
0 |
4 |
unless open WR, ">", $o->{'API'}{'build_dir'} . "/" . $o->{'API'}{'modfname'} . ".pm" |
|
352
|
1 |
3 |
if ($config_options->{'EXPORT_ALL'}) { } |
|
358
|
4 |
4 |
if ($_ =~ /^_/ and not $_ =~ /^__/) |
|
360
|
0 |
4 |
if ($length + $l > $max) |
|
364
|
1 |
3 |
if ($length == $offset) { } |
|
372
|
1 |
3 |
if ($config_options->{'EXPORT_OK_ALL'} or $config_options->{'EXPORT_TAGS_ALL'}) { } |
|
378
|
4 |
4 |
if ($_ =~ /^_/ and not $_ =~ /^__/) |
|
380
|
0 |
4 |
if ($length + $l > $max) |
|
384
|
1 |
3 |
if ($length == $offset) { } |
|
392
|
1 |
3 |
if ($config_options->{'EXPORT_TAGS_ALL'}) |
|
395
|
4 |
4 |
if ($_ =~ /^_/ and not $_ =~ /^__/) |
|
397
|
0 |
4 |
if ($length + $l > $max) |
|
401
|
1 |
3 |
if ($length == $offset) { } |
|
411
|
0 |
4 |
unless close WR |
|
424
|
0 |
1 |
unless open WRM, ">", "$bd/MANIFEST" |
|
426
|
1 |
0 |
if ($c->{'WRITE_PM'}) |
|
427
|
0 |
1 |
if ($ih) |
|
429
|
1 |
0 |
if ($c->{'WRITE_MAKEFILE_PL'}) |
|
432
|
1 |
0 |
if ($c->{'T'}) |
|
435
|
0 |
1 |
unless close WRM |
|
444
|
1 |
0 |
unless (-d $path) |
|
445
|
0 |
1 |
unless (File::Path::make_path($path, {"verbose", 1})) |
|
449
|
0 |
1 |
unless open WRT, ">", "$path/00load.t" |
|
456
|
0 |
1 |
unless close WRT |