| line |
true |
false |
branch |
|
53
|
0 |
0 |
unless (-d $self->{'LOCATION'})
|
|
68
|
0 |
6 |
unless (-r $filename)
|
|
85
|
1 |
1 |
if (scalar @path == 0)
|
|
99
|
1 |
3 |
if (scalar @path == 0)
|
|
119
|
10 |
2 |
if ($self->content) { }
|
|
123
|
4 |
6 |
if ref $data eq ""
|
|
125
|
0 |
10 |
unless $template->process(\$self->content, $data, \$content)
|
|
127
|
0 |
2 |
if (ref $data ne "")
|
|
134
|
1 |
11 |
if ($mode eq "fail" and -f $filename)
|
|
138
|
1 |
10 |
if ($mode eq "silent" and -f $filename)
|
|
144
|
0 |
10 |
if (my $user = $self->user)
|
|
145
|
0 |
0 |
unless $uid = getpwnam $user
|
|
149
|
0 |
10 |
if (my $group = $self->group)
|
|
150
|
0 |
0 |
unless $gid = getgrnam $group
|
|
153
|
1 |
9 |
if ($mode eq 'append' and -f $filename) { }
|
|
154
|
0 |
1 |
unless open FILE, ">>", $filename
|
|
156
|
2 |
7 |
unless open FILE, ">", $filename
|
|
162
|
2 |
6 |
if (my $filemode = $self->mode)
|
|
163
|
1 |
1 |
if ($filemode =~ /\A[0-7]{4}\z/) { }
|
|
164
|
0 |
1 |
unless chmod oct $filemode, $filename
|
|
170
|
0 |
7 |
if ($gid)
|
|
171
|
0 |
0 |
unless chown $uid, $gid, $filename
|