| line |
true |
false |
branch |
|
233
|
2 |
2 |
unless (%arg_for) |
|
237
|
2 |
2 |
if (defined(my $sub = delete $arg_for{'as'})) |
|
239
|
0 |
2 |
unless ($sub =~ /^\w+$/) |
|
245
|
0 |
4 |
if (%arg_for) |
|
264
|
0 |
8 |
unless ('CODE' eq &Scalar::Util::reftype($_[0])) |
|
337
|
14 |
4 |
if (my $package = $PACKAGE_FOR{$method}) |
|
339
|
0 |
14 |
if (my $error = $@) |
|
346
|
18 |
0 |
unless (exists $$self{'value_for'}{$method}) |
|
348
|
6 |
12 |
if $$value_for{'dont_cache'} |
|
362
|
0 |
1 |
if $peek_loaded |
|
367
|
0 |
1 |
if (my $error = $@) |
|
381
|
0 |
1 |
unless $code |
|
388
|
0 |
1 |
unless open SAVEERR, '<&=STDERR' |
|
389
|
0 |
1 |
unless close STDERR |
|
394
|
0 |
1 |
unless open STDERR, '>', \$stderr |
|
399
|
0 |
1 |
unless close STDERR |
|
403
|
0 |
1 |
unless open STDERR, '>&=SAVEERR' |
|
410
|
0 |
1 |
unless $self->_require_devel_peek |