| line |
true |
false |
branch |
|
21
|
30 |
34 |
@_ ? : |
|
22
|
30 |
34 |
@_ ? : |
|
27
|
1 |
158 |
if (tied *$globref or $fileno < 0) |
|
39
|
152 |
2 |
if ($pid == $$) |
|
47
|
2 |
152 |
unless $fh_keeper |
|
64
|
294 |
0 |
$_ eq $tmp[0] ? : |
|
72
|
2 |
156 |
unless open $fh_keeper, ">&$fileno" |
|
79
|
50 |
106 |
if ($strategy_option->{'preserve_io_layers'}) |
|
82
|
18 |
138 |
if ($strategy_option->{'io_layers'}) |
|
98
|
174 |
124 |
unless my(@tmp) = @io_layers |
|
99
|
200 |
24 |
$_ eq $tmp[0] ? : |
|
115
|
3 |
323 |
unless open $glob, $what |
|
117
|
296 |
27 |
if $fileno == $fno_want |
|
119
|
6 |
21 |
if ($fileno > $fno_want) |
|
122
|
1 |
20 |
if (grep {$fileno == fileno $_;} @fh) |
|
125
|
1 |
19 |
unless open my $fh, $what |
|
126
|
1 |
18 |
if (fileno $fh != $fileno) |