| 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 |
10 |
ref $caller ? :
|
|
281
|
6 |
10 |
if ref $caller
|
|
292
|
0 |
10 |
unless exists $$opts{'into_file'}
|
|
305
|
10 |
10 |
unless -d $t_dir or -d $xt_dir
|
|
309
|
10 |
0 |
if (-d $tlib_dir)
|
|
316
|
10 |
0 |
if $found
|
|
319
|
0 |
10 |
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))
|
|
353
|
0 |
2 |
if ($error)
|
|
354
|
0 |
0 |
unless $error =~ /^Can't (locate|call) method "DOES"/
|
|
362
|
0 |
2 |
if ($whatami eq 'reference')
|
|
367
|
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') { }
|
|
369
|
2 |
0 |
defined $thing ? :
|
|
398
|
2 |
0 |
if ($rslt) { }
|
|
414
|
1 |
0 |
@_ % 2 ? :
|
|
420
|
1 |
0 |
if (ref $object eq 'CODE')
|
|
424
|
0 |
1 |
unless ref $tmp
|
|
435
|
0 |
1 |
unless ok &Scalar::Util::blessed($object), "$name is blessed"
|
|
438
|
1 |
0 |
if (exists $tests{'isa'})
|
|
440
|
0 |
1 |
ref $tests{'isa'} eq 'ARRAY' ? :
|
|
445
|
1 |
0 |
if (exists $tests{'does'})
|
|
447
|
1 |
0 |
ref $tests{'does'} eq 'ARRAY' ? :
|
|
452
|
1 |
0 |
if (exists $tests{'can'})
|
|
454
|
1 |
0 |
ref $tests{'can'} eq 'ARRAY' ? :
|
|
459
|
1 |
0 |
if (exists $tests{'api'})
|
|
461
|
1 |
0 |
ref $tests{'api'} eq 'ARRAY' ? :
|
|
466
|
1 |
0 |
if (delete $tests{'clean'})
|
|
471
|
1 |
0 |
if (exists $tests{'more'})
|
|
487
|
0 |
1 |
if ($bail)
|
|
494
|
1 |
0 |
$result ? :
|
|
502
|
0 |
0 |
unless ($chosen)
|
|
506
|
0 |
0 |
if ref $_ and $chosen = $_
|
|
512
|
0 |
0 |
exists &$_ ? :
|
|
522
|
0 |
0 |
$chosen ? :
|
|
579
|
0 |
2 |
if $method eq 'DESTROY'
|
|
580
|
0 |
2 |
unless my $coderef = 'Test::Deep'->can($method)
|
|
704
|
1 |
1 |
if @_ == 1
|
|
721
|
7 |
0 |
unless $ENV{'RELEASE_TESTING'} or $ENV{'AUTHOR_TESTING'}
|
|
730
|
16 |
96 |
if ref $function eq 'HASH'
|
|
735
|
7 |
0 |
if ($opt{'extended'} and not _should_extended_test)
|
|
744
|
0 |
0 |
if (eval "require $module")
|
|
747
|
0 |
0 |
if ($opt{'multi'}) { }
|
|
763
|
0 |
0 |
unless $ENV{'RELEASE_TESTING'}
|
|
859
|
0 |
0 |
unless defined $desc
|
|
882
|
0 |
0 |
unless $ok
|
|
884
|
0 |
0 |
if ($VERBOSE or not $ok)
|