line | % | coverage | condition |
14 | 25 | | $] >= 5.008001 and $Config{'useithreads'} and $INC{'threads.pm'} |
114 | 100 | | $Test ||= $class->create |
260 | 33 | | $max =~ /^\+?\d+$/ and $max > 0 |
385 | 67 | | defined $name and $name =~ /^[\d\s]+$/ |
501 | 0 | | $numval != 0 and $numval ne $val |
528 | 67 | | not defined $got or not defined $expect |
530 | 33 | | !defined($got) && !defined($expect) |
546 | 0 | | not defined $got or not defined $expect |
548 | 0 | | !defined($got) && !defined($expect) |
605 | 33 | | not defined $got or not defined $dont_expect |
607 | 0 | | defined $got || defined $dont_expect |
621 | 0 | | not defined $got or not defined $dont_expect |
623 | 0 | | defined $got || defined $dont_expect |
741 | 33 | | defined $file and defined $line |
794 | 50 | | $why ||= '' |
836 | 0 | | $why ||= '' |
922 | 0 | | ($re, $opts) = $regex =~ m[^ /(.*)/ (\w*) $ ]sx or (undef, $re, $opts) = $regex =~ /^ m([^\w\s]) (.+) \1 (\w*) $/sx |
1042 | 0 | | eval {
do {
$maybe_fh->isa('IO::Handle')
}
} || eval {
do {
(tied $maybe_fh || '')->can('TIEHANDLE')
}
} |
| 0 | | tied $maybe_fh || '' |
1603 | 25 | | $pack || $self->caller(1) || $self->exported_to |
1625 | 50 | | $height ||= 0 |
1654 | 33 | | !$$self{'Have_Plan'} && ($$self{'Curr_Test'}, 'Somehow your tests ran without a plan!') |