| line |
true |
false |
branch |
|
6
|
0 |
2 |
$^O =~ /mswin32/i ? : |
|
7
|
0 |
2 |
$FileHandle::Fmode::Config{'libc'} =~ /\-lucrt$|ucrt\.lib$/i ? : |
|
28
|
2 |
78 |
if ($@) |
|
29
|
76 |
2 |
if (defined $fileno) |
|
30
|
20 |
56 |
if ($fileno == -1) |
|
31
|
0 |
20 |
if ($] < "5.007") |
|
41
|
4 |
80 |
unless (defined $fileno) |
|
42
|
24 |
56 |
if ($fileno == -1 or 0) |
|
43
|
0 |
24 |
if ($] < "5.007") |
|
44
|
4 |
20 |
if (perliol_readable($_[0]) and not perliol_writable($_[0])) |
|
52
|
16 |
40 |
if (defined $fmode and ($fmode & 3) == 0) |
|
58
|
4 |
80 |
unless (defined $fileno) |
|
59
|
24 |
56 |
if ($fileno == -1 or 0) |
|
60
|
0 |
24 |
if ($] < "5.007") |
|
61
|
8 |
16 |
if (not perliol_readable($_[0]) and perliol_writable($_[0])) |
|
69
|
16 |
40 |
if (defined $fmode and ($fmode & 3) == 1) |
|
74
|
30 |
10 |
if (is_WO($_[0]) or is_RW($_[0])) |
|
79
|
28 |
12 |
if (is_RO($_[0]) or is_RW($_[0])) |
|
85
|
2 |
98 |
unless (defined $fileno) |
|
86
|
30 |
68 |
if ($fileno == -1 or 0) |
|
87
|
0 |
30 |
if ($] < "5.007") |
|
88
|
18 |
12 |
if (perliol_readable($_[0]) and perliol_writable($_[0])) |
|
96
|
36 |
32 |
if (defined $fmode and ($fmode & 3) == 2) |
|
102
|
2 |
40 |
unless (defined $fileno) |
|
103
|
12 |
28 |
if ($fileno == -1) |
|
104
|
0 |
12 |
if ($] < "5.007") |
|
112
|
8 |
20 |
if ($fmode & 1024) |