line |
true |
false |
branch |
26
|
2 |
78 |
if ($@) |
27
|
76 |
2 |
if (defined $fileno) |
28
|
20 |
56 |
if ($fileno == -1) |
29
|
0 |
20 |
if ($] < 5.007) |
39
|
4 |
80 |
unless (defined $fileno) |
40
|
24 |
56 |
if ($fileno == -1) |
41
|
0 |
24 |
if ($] < 5.007) |
42
|
4 |
20 |
if (perliol_readable($_[0]) and not perliol_writable($_[0])) |
45
|
0 |
56 |
if ($is_win32) |
46
|
0 |
0 |
if (win32_fmode($_[0]) & 1) |
50
|
16 |
40 |
if (defined $fmode and ($fmode & 3) == 0) |
56
|
4 |
80 |
unless (defined $fileno) |
57
|
24 |
56 |
if ($fileno == -1) |
58
|
0 |
24 |
if ($] < 5.007) |
59
|
8 |
16 |
if (not perliol_readable($_[0]) and perliol_writable($_[0])) |
62
|
0 |
56 |
if ($is_win32) |
63
|
0 |
0 |
if (win32_fmode($_[0]) & 2) |
67
|
16 |
40 |
if (defined $fmode and ($fmode & 3) == 1) |
72
|
30 |
10 |
if (is_WO($_[0]) or is_RW($_[0])) |
77
|
28 |
12 |
if (is_RO($_[0]) or is_RW($_[0])) |
83
|
2 |
98 |
unless (defined $fileno) |
84
|
30 |
68 |
if ($fileno == -1) |
85
|
0 |
30 |
if ($] < 5.007) |
86
|
18 |
12 |
if (perliol_readable($_[0]) and perliol_writable($_[0])) |
89
|
0 |
68 |
if ($is_win32) |
90
|
0 |
0 |
if (win32_fmode($_[0]) & 128) |
94
|
36 |
32 |
if (defined $fmode and ($fmode & 3) == 2) |
100
|
2 |
40 |
unless (defined $fileno) |
101
|
12 |
28 |
if ($fileno == -1) |
102
|
0 |
12 |
if ($] < 5.007) |
105
|
0 |
28 |
if ($is_win32) |
106
|
0 |
0 |
if ($] < 5.006001) |
110
|
8 |
20 |
if ($fmode & 1024) |