| line |
true |
false |
branch |
|
47
|
0 |
0 |
unless s/^(use Inline::Module::LeanDist.*?)$/# Commented out for distribution by Inline::Module::LeanDist\n#$1/gm |
|
53
|
0 |
0 |
unless s/^(use Inline::Module::LeanDist.*?)$/# Commented out for distribution by Inline::Module::LeanDist\n#$1\n\n$xsloader_snippet/gm |
|
57
|
0 |
0 |
unless $inline_file =~ m[([^/]+)[.]pm$] |
|
63
|
0 |
0 |
unless s/^(\s*OBJECT\s*=>\s*')(.*?')/$1$base_filename.o $2/gm |
|
71
|
0 |
0 |
unless -f $_ |
|
73
|
0 |
0 |
if (m[/${base_filename}[.]xs$]) |
|
74
|
0 |
0 |
if defined $xs_file |
|
83
|
0 |
0 |
unless defined $xs_file |
|
86
|
0 |
0 |
unless copy($xs_file, "$distvname/$base_filename.xs") |
|
91
|
0 |
0 |
unless s/^#include "INLINE.h"\s*$/$inline_h_file/gm |
|
101
|
0 |
0 |
unless open my $fh, '<', $filename |
|
117
|
0 |
0 |
unless open $fh, '>', "$filename.edit" |
|
123
|
0 |
0 |
unless rename "$filename.edit", $filename |
|
132
|
0 |
0 |
unless rename "$manifest_file.edit", $manifest_file |
|
134
|
0 |
0 |
unless open my $fh, '>>', $manifest_file |