| line |
true |
false |
branch |
|
128
|
2 |
1 |
$pm ? : |
|
129
|
2 |
1 |
$pm ? : |
|
130
|
2 |
1 |
$pm ? : |
|
134
|
3 |
0 |
if ($args{'module_srcs'}) { } |
|
136
|
5 |
0 |
unless $mod_pm =~ /\.pm\z/ |
|
143
|
0 |
0 |
unless $mod_pm =~ /\.pm\z/ |
|
144
|
0 |
0 |
if $module_srcs{$mod_pm} |
|
147
|
0 |
0 |
unless $path |
|
150
|
0 |
0 |
unless open my $fh, '<', $path |
|
157
|
0 |
3 |
if ($args{'stripper'}) |
|
173
|
0 |
3 |
if defined $args{'preamble'} |
|
174
|
1 |
2 |
if ($add_begin_block) { } |
|
180
|
0 |
3 |
if $args{'assume_strict'} // 0 |
|
188
|
5 |
0 |
unless $module_srcs{$mod_pm} =~ /\R\z/ |
|
191
|
2 |
1 |
if ($pm) { } |
|
231
|
2 |
1 |
if ($pm) |
|
236
|
2 |
1 |
if ($put_hook_at_the_end) { } |
|
247
|
0 |
3 |
if defined $args{'postamble'} |
|
249
|
0 |
3 |
if ($args{'output'}) { } |
|
251
|
0 |
0 |
if (-f $outfile) |
|
253
|
0 |
0 |
unless $args{'overwrite'} |
|
255
|
0 |
0 |
unless open my $fh, '>', $outfile |