| line |
true |
false |
branch |
|
240
|
1 |
50 |
unless defined $file_name |
|
241
|
1 |
49 |
unless open my $fh, '<', $file_name |
|
243
|
0 |
49 |
unless close $fh |
|
255
|
4 |
7 |
if (1 == $defined_args) { } |
|
|
6 |
1 |
elsif (2 == $defined_args) { } |
|
271
|
5 |
20 |
if ($char_line_1 ne $char_line_2) |
|
289
|
2 |
11 |
unless defined $got_file |
|
290
|
1 |
10 |
unless defined $exp_file |
|
292
|
1 |
9 |
unless open my $got_fh, '<', $got_file |
|
293
|
1 |
8 |
unless open my $exp_fh, '<', $exp_file |
|
307
|
5 |
1 |
unless defined $got_line or defined $exp_line |
|
316
|
3 |
12 |
unless ($ok) |
|
328
|
0 |
8 |
unless close $got_fh |
|
329
|
0 |
8 |
unless close $exp_fh |
|
338
|
2 |
69 |
if (defined $name) |
|
343
|
1 |
68 |
unless defined $cmd |
|
345
|
26 |
42 |
if (ref $cmd and UNIVERSAL::isa($cmd, 'Test::Command')) |
|
350
|
12 |
56 |
if (ref $cmd eq 'ARRAY') |
|
364
|
1 |
79 |
unless defined $cmd |
|
366
|
32 |
47 |
if (ref $cmd and UNIVERSAL::isa($cmd, 'Test::Command')) { } |
|
370
|
1 |
31 |
unless ($$cmd{'result'}) |
|
391
|
1 |
50 |
unless defined $cmd |
|
393
|
40 |
10 |
unless (ref $cmd) |
|
399
|
0 |
50 |
unless open my $saved_stdout, '>&STDOUT' |
|
400
|
0 |
50 |
unless open my $saved_stderr, '>&STDERR' |
|
407
|
0 |
50 |
unless close STDOUT |
|
408
|
0 |
50 |
unless close STDERR |
|
409
|
0 |
50 |
unless open STDOUT, '>&' . fileno($temp_stdout_fh) |
|
410
|
0 |
50 |
unless open STDERR, '>&' . fileno($temp_stderr_fh) |
|
415
|
50 |
0 |
defined ${^CHILD_ERROR_NATIVE} ? : |
|
421
|
6 |
44 |
if ($wait_status) { } |
|
433
|
0 |
50 |
unless close STDOUT |
|
434
|
0 |
50 |
unless close STDERR |
|
435
|
0 |
50 |
unless open STDOUT, '>&' . fileno($saved_stdout) |
|
436
|
0 |
50 |
unless open STDERR, '>&' . fileno($saved_stderr) |
|
917
|
0 |
2 |
unless ($is_ok) |
|
1151
|
0 |
2 |
unless ($is_ok) |