| line |
true |
false |
branch |
|
37
|
0 |
0 |
unless open my $fh, '<', $fn |
|
41
|
0 |
0 |
if /^(?:#.*)?$/ |
|
48
|
0 |
0 |
if (my($k, $v) = /^(\w+)\s*=\s*(.*)/) { } |
|
|
0 |
0 |
elsif (/^((?:\w+\b\s*(?:\*+\s*)?)*)(\w+)\s*\(\s*(.*?)\s*\)$/) { } |
|
49
|
0 |
0 |
if (my($mark) = $v =~ /^<<\s*(\w+)$/) |
|
53
|
0 |
0 |
unless defined $line |
|
54
|
0 |
0 |
if $line =~ /^$mark$/ |
|
68
|
0 |
0 |
if ($f{'pTHX'} = $args =~ s/^pTHX(?:_\s+|$)//) |
|
73
|
0 |
0 |
@args ? : |
|
88
|
0 |
0 |
unless defined $module_name |
|
91
|
0 |
0 |
unless $module_name =~ /^\w+(?:::\w+)*$/ |
|
97
|
0 |
0 |
unless $c_module_name =~ /^\w+$/ |
|
104
|
0 |
0 |
if $$config{'max_version'} < $$config{'min_version'} |
|
123
|
0 |
0 |
unless $$config{'module_h_barrier'} =~ /^\w+$/ |
|
129
|
0 |
0 |
unless $$config{'c_api_h_barrier'} =~ /^\w+$/ |
|
143
|
0 |
0 |
unless -d $dir |
|
145
|
0 |
0 |
unless open my $fh, '>', $save_as |
|
147
|
0 |
0 |
ref $template ? : |
|
152
|
0 |
0 |
if $Text::Template::ERROR |
|
176
|
0 |
0 |
unless /^\s*(\w+)\s*=\s*(.*?)\s*$/ |