| blib/lib/Oktest.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 73 | 82 | 89.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 632 | 1 | 0 | 0 | $s eq $errmsg && $rest =~ / at .*/ |
| 1399 | 92 | 24 | 8 | $status eq 's' and $$this{'report_skipped'} |
| 1400 | 84 | 24 | 8 | $status eq 't' and $$this{'report_todo'} |
| 1401 | 24 | 24 | 60 | $status ne 's' and $status ne 't' |
| 1693 | 8 | 1 | 4 | is_number($arg) && $arg =~ /^-?\d+$/ |
| 1698 | 8 | 3 | 2 | is_number($arg) && $arg =~ /^-?\d+\.\d+$/ |
| 2034 | 8 | 0 | 6 | $short && $long |
| 2086 | 46 | 2 | 2 | $pattern and $pattern =~ m[^/(.*)/$] |
| 2099 | 4 | 29 | 50 | $$argv[0] and $$argv[0] =~ /^-/ |
| 2111 | 10 | 11 | 1 | $arg_required and not $has_arg |
| 2113 | 11 | 9 | 1 | not $arg_required and $has_arg |
| 2140 | 0 | 27 | 0 | $rexp and not $arg =~ /$rexp/ |
| line | l | !l | condition |
|---|---|---|---|
| 61 | 347 | 5 | $block ||= sub { TODO('not implemented yet.'); } |
| 1329 | 54 | 7 | $style ||= 'tap' |
| 1374 | 54 | 6 | $$c{'.'} || 0 |
| 23 | 37 | $$c{'f'} || 0 | |
| 27 | 33 | $$c{'E'} || 0 | |
| 25 | 35 | $$c{'s'} || 0 | |
| 25 | 35 | $$c{'t'} || 0 | |
| 2017 | 43 | 2 | $argv || \@ARGV |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 129 | 24 | 36 | 0 | $opts{'reporter'} || Oktest::Reporter::create_instance($opts{'style'}) |
| 134 | 3 | 3 | 54 | $$reporter{'report_skipped'} ||= $opts{'report_skipped'} |
| 135 | 3 | 3 | 54 | $$reporter{'report_todo'} ||= $opts{'report_todo'} |
| 376 | 83 | 28 | 195 | not $filename or $filename eq '/.cpan/build/Oktest-0.0103-xMdle4/blib/lib/Oktest.pm' |
| 464 | 3 | 1 | 3 | $actual =~ /\n/ || $expected =~ /\n/ |
| 1120 | 880 | 0 | 0 | $$this{'reporter'} ||= $Oktest::Reporter::REPORTER->new |
| 1259 | 4 | 6 | 50 | $pat1 or $pat2 |
| 1536 | 8 | 8 | 15 | $status eq 's' or $status eq 't' |
| 1756 | 2 | 2 | 3 | $_ eq '.' or $_ eq '..' |
| 2017 | 40 | 0 | 5 | $command || $0 =~ /([-\w.]+)$/ && $1 |