| line |
true |
false |
branch |
|
199
|
0 |
0 |
if @_ |
|
213
|
0 |
0 |
unless exists $SEEN_PKG{$pkg} |
|
215
|
0 |
0 |
unless @args |
|
218
|
0 |
0 |
if (@args == 1 and $args[0] eq 'PACKAGE') { } |
|
|
0 |
0 |
elsif (@args == 1 and $args[0] eq 'END') { } |
|
|
0 |
0 |
elsif ($PACKAGE) { } |
|
225
|
0 |
0 |
if $class->debug |
|
228
|
0 |
0 |
unless $PACKAGE |
|
235
|
0 |
0 |
if $class->debug |
|
240
|
0 |
0 |
if $class->debug |
|
246
|
0 |
0 |
unless $@ |
|
247
|
0 |
0 |
if $class->debug |
|
250
|
0 |
0 |
if $@ |
|
268
|
0 |
0 |
unless exists $pkg{$pkg} |
|
271
|
0 |
0 |
if (@$args == 1 and $$args[0] ne 'Config') { } |
|
|
0 |
0 |
elsif (@$args and $$args[0] eq 'Config') { } |
|
276
|
0 |
0 |
if (@$args - 1) % 2 |
|
286
|
0 |
0 |
if (@$args - 1) % 2 |
|
294
|
0 |
0 |
if (defined $code) |
|
298
|
0 |
0 |
unless open my $fh, '>>', 'File::Spec'->catfile('src', $file) |
|
307
|
0 |
0 |
unless $pkg{$pkg}{'code'} |
|
310
|
0 |
0 |
if $PACKAGER |
|
317
|
0 |
0 |
unless $SEEN_PKG{$pkg}{'end'} |