| line |
true |
false |
branch |
|
36
|
0 |
0 |
unless (exists $$params{'skip_interative'} and $$params{'skip_interative'}) |
|
37
|
0 |
0 |
unless _is_interactive() |
|
40
|
0 |
0 |
if exists $$params{'safe_level'} |
|
43
|
0 |
0 |
unless ($tfh and $filename) |
|
48
|
0 |
0 |
if (exists $$params{'binmode_layer'} and defined $$params{'binmode_layer'}) { } |
|
|
0 |
0 |
elsif (exists $$params{'BINMODE'} and $$params{'BINMODE'}) { } |
|
57
|
0 |
0 |
if (defined $message) |
|
59
|
0 |
0 |
if (not $ref) { } |
|
|
0 |
0 |
elsif ($ref eq 'SCALAR') { } |
|
|
0 |
0 |
elsif ($ref eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($ref eq 'GLOB') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::can($message, 'getlines')) { } |
|
75
|
0 |
0 |
unless ($^O =~ /Win32/) |
|
86
|
0 |
0 |
if ($status != 0) |
|
87
|
0 |
0 |
$status != -1 ? : |
|
97
|
0 |
0 |
unless (open $outfh, '<', $filename) |
|
102
|
0 |
0 |
wantarray ? : |
|
108
|
0 |
0 |
unless (open $tty, '<', '/dev/tty') |
|
115
|
0 |
0 |
unless ($tpgrp == $pgrp) |