| 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!') |