| line |
true |
false |
branch |
|
22
|
0 |
16 |
$ENV{'PERL_TEST_MODERN_ALLOW_WARNINGS'} ? : |
|
251
|
10 |
15 |
/\A[:-](\w+)\z/ && $HINTS{$1} ? : |
|
|
13 |
25 |
ref $_ ? : |
|
257
|
12 |
8 |
if $symbols == 0 |
|
259
|
6 |
14 |
ref $_[0] eq 'HASH' ? : |
|
260
|
14 |
6 |
unless ref $$globals{'into'} |
|
277
|
6 |
9 |
ref $caller ? : |
|
281
|
6 |
9 |
if ref $caller |
|
292
|
0 |
9 |
unless exists $$opts{'into_file'} |
|
305
|
9 |
9 |
unless -d $t_dir or -d $xt_dir |
|
309
|
9 |
0 |
if (-d $tlib_dir) |
|
316
|
9 |
0 |
if $found |
|
319
|
0 |
9 |
if ($$opts{'lib'} and not $found) |
|
334
|
0 |
2 |
if (not defined $thing) { } |
|
|
2 |
0 |
elsif (ref $thing) { } |
|
342
|
2 |
0 |
if (&Scalar::Util::blessed($thing)) |
|
352
|
0 |
2 |
if ($error) |
|
353
|
0 |
0 |
unless $error =~ /^Can't (locate|call) method "DOES"/ |
|
361
|
0 |
2 |
if ($whatami eq 'reference') |
|
366
|
2 |
0 |
if (defined $thing_name) { } |
|
|
0 |
0 |
elsif ($whatami eq 'object') { } |
|
|
0 |
0 |
elsif ($whatami eq 'reference') { } |
|
|
0 |
0 |
elsif ($whatami eq 'undef') { } |
|
|
0 |
0 |
elsif ($whatami eq 'class') { } |
|
368
|
2 |
0 |
defined $thing ? : |
|
397
|
2 |
0 |
if ($rslt) { } |
|
413
|
1 |
0 |
@_ % 2 ? : |
|
419
|
1 |
0 |
if (ref $object eq 'CODE') |
|
423
|
0 |
1 |
unless ref $tmp |
|
434
|
0 |
1 |
unless ok &Scalar::Util::blessed($object), "$name is blessed" |
|
437
|
1 |
0 |
if (exists $tests{'isa'}) |
|
439
|
0 |
1 |
ref $tests{'isa'} eq 'ARRAY' ? : |
|
444
|
1 |
0 |
if (exists $tests{'does'}) |
|
446
|
1 |
0 |
ref $tests{'does'} eq 'ARRAY' ? : |
|
451
|
1 |
0 |
if (exists $tests{'can'}) |
|
453
|
1 |
0 |
ref $tests{'can'} eq 'ARRAY' ? : |
|
458
|
1 |
0 |
if (exists $tests{'api'}) |
|
460
|
1 |
0 |
ref $tests{'api'} eq 'ARRAY' ? : |
|
465
|
1 |
0 |
if (delete $tests{'clean'}) |
|
470
|
1 |
0 |
if (exists $tests{'more'}) |
|
486
|
0 |
1 |
if ($bail) |
|
493
|
1 |
0 |
$result ? : |
|
501
|
0 |
0 |
unless ($chosen) |
|
505
|
0 |
0 |
if ref $_ and $chosen = $_ |
|
511
|
0 |
0 |
exists &$_ ? : |
|
521
|
0 |
0 |
$chosen ? : |
|
578
|
0 |
2 |
if $method eq 'DESTROY' |
|
579
|
0 |
2 |
unless my $coderef = 'Test::Deep'->can($method) |
|
703
|
1 |
0 |
if @_ == 1 |
|
720
|
7 |
0 |
unless $ENV{'RELEASE_TESTING'} or $ENV{'AUTHOR_TESTING'} |
|
729
|
16 |
96 |
if ref $function eq 'HASH' |
|
734
|
7 |
0 |
if ($opt{'extended'} and not _should_extended_test) |
|
743
|
0 |
0 |
if (eval "require $module") |
|
746
|
0 |
0 |
if ($opt{'multi'}) { } |
|
762
|
0 |
0 |
unless $ENV{'RELEASE_TESTING'} |
|
858
|
0 |
0 |
unless defined $desc |
|
881
|
0 |
0 |
unless $ok |
|
883
|
0 |
0 |
if ($VERBOSE or not $ok) |