line |
true |
false |
branch |
5
|
6 |
0 |
if $^V ge v5.8.0 |
36
|
2 |
110 |
if @_ < 2 |
37
|
2 |
108 |
if @_ > 4 |
38
|
11 |
97 |
unless defined $mode |
41
|
28 |
80 |
unless my $emode = $modemap{$mode} |
43
|
2 |
78 |
if ($file =~ /\0/) |
44
|
2 |
0 |
if exists &Errno::ENOENT |
48
|
76 |
2 |
unless (defined $layers) |
51
|
25 |
51 |
$emode =~ />/ ? : |
55
|
7 |
71 |
defined $layers ? : |
|
36 |
42 |
unless open my $fh, $emode . (defined $layers ? " $layers" : ""), $file |
56
|
21 |
21 |
if $binary |
67
|
19 |
26 |
unless _open("fopen", @_) |
72
|
4 |
80 |
if @_ < 3 |
73
|
2 |
78 |
if @_ > 4 |
75
|
4 |
22 |
$mode eq 'rw' ? : |
|
24 |
26 |
$mode eq 'w' ? : |
|
28 |
50 |
$mode eq 'r' ? : |
81
|
22 |
34 |
unless defined $flags |
89
|
16 |
0 |
defined $flags->{$k} ? : |
|
8 |
18 |
$k eq 'trunc' ? : |
|
0 |
26 |
$k eq 'sync' ? : |
|
0 |
26 |
$k eq 'nonblock' ? : |
|
0 |
26 |
$k eq 'nofollow' ? : |
|
0 |
26 |
$k eq 'noctty' ? : |
|
0 |
26 |
$k eq 'noatime' ? : |
|
12 |
26 |
$k eq 'excl' ? : |
|
0 |
38 |
$k eq 'directory' ? : |
|
0 |
38 |
$k eq 'direct' ? : |
|
0 |
38 |
$k eq 'async' ? : |
|
7 |
38 |
$k eq 'append' ? : |
|
16 |
45 |
$k eq 'creat' ? : |
110
|
2 |
36 |
if ($file =~ /\0/) |
111
|
2 |
0 |
if exists &Errno::ENOENT |
115
|
16 |
20 |
unless sysopen my $fh, $file, $emode, $perms |
124
|
9 |
10 |
unless _sysopen("fsysopen", @_) |
129
|
2 |
6 |
if @_ < 2 |
130
|
2 |
4 |
if @_ > 2 |
132
|
2 |
2 |
if ($dir =~ /\0/) |
133
|
2 |
0 |
if exists &Errno::ENOENT |
137
|
0 |
2 |
unless opendir my $dh, $dir |
146
|
1 |
2 |
unless _opendir("fopendir", @_) |