| blib/lib/Test/File/Contents.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 33 | 54.5 |
| line | l | !l | condition |
|---|---|---|---|
| 192 | 3 | 3 | $Test->ok($have eq $want, $desc) || $Test->diag(diff(\$have, \$want, {'CONTEXT', $opts->{'context'}, 'STYLE', $opts->{'style'}, 'FILENAME_A', $file, 'FILENAME_B', 'Want'})) |
| 415 | 12 | 3 | $Test->ok($contents[0] eq $contents[1], $desc || "$f1 and $f2 contents are the same") || $Test->diag(&$diag()) |
| 427 | 22 | 14 | $Test->ok(scalar &$code($contents), $desc) || $Test->diag(" $err") |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 149 | 2 | 7 | 0 | $desc || "$file contents equal to string" |
| 184 | 1 | 5 | 0 | $desc ||= "$file contents equal to string" |
| 197 | 0 | 0 | 0 | $Test->ok(0, $desc) || $Test->diag(" Could not open file ${file}: $!") |
| 228 | 2 | 7 | 0 | $desc || "$file contents not equal to string" |
| 260 | 1 | 5 | 0 | $desc || "$file contents match regex" |
| 290 | 1 | 5 | 0 | $desc || "$file contents do not match regex" |
| 327 | 4 | 2 | 0 | $desc || "$arg_file has md5sum" |
| 411 | 0 | 0 | 0 | $Test->ok(0, $desc) || $Test->diag(" Could not open file ${file}: $!") |
| 430 | 0 | 0 | 0 | $Test->ok(0, $desc) || $Test->diag(" Could not open file ${file}: $!") |