| line |
true |
false |
branch |
|
39
|
0 |
0 |
if $field eq 'DESTROY'
|
|
41
|
0 |
0 |
unless $self->_field_exists($field)
|
|
47
|
0 |
0 |
@_ ? :
|
|
51
|
0 |
0 |
@_ ? :
|
|
97
|
0 |
0 |
unless $self->_field_exists($field)
|
|
124
|
0 |
0 |
if ($username eq 'anonymous') { }
|
|
127
|
0 |
0 |
unless (defined $pw)
|
|
133
|
0 |
0 |
unless (defined $pw)
|
|
138
|
0 |
0 |
unless ($crpt eq $cpassword)
|
|
142
|
0 |
0 |
if (defined $become)
|
|
168
|
0 |
0 |
if (@_) { }
|
|
196
|
0 |
0 |
if (@_)
|
|
200
|
0 |
0 |
substr($root_path, length($root_path) - 1, 1) eq '/' ? :
|
|
220
|
0 |
0 |
CORE::chmod($mode, $fn) ? :
|
|
272
|
0 |
0 |
-e $fn && !(-d $fn) && unlink($fn) ? :
|
|
290
|
0 |
0 |
-e $full_path && -d $full_path ? :
|
|
306
|
0 |
0 |
if -d $dir
|
|
310
|
0 |
0 |
CORE::mkdir($dir, $mode) ? :
|
|
312
|
0 |
0 |
if ($ret)
|
|
331
|
0 |
0 |
if (-e $dir)
|
|
332
|
0 |
0 |
if (-d $dir) { }
|
|
333
|
0 |
0 |
if CORE::rmdir $dir
|
|
335
|
0 |
0 |
if unlink $dir
|
|
356
|
0 |
0 |
if (-e $dirfile)
|
|
357
|
0 |
0 |
if (not -d $dirfile) { }
|
|
389
|
0 |
0 |
if (-e $dirfile)
|
|
390
|
0 |
0 |
if (not -d $dirfile) { }
|
|
403
|
0 |
0 |
substr($dirfile, length($dirfile) - 1, 1) eq '/' ? :
|
|
490
|
0 |
0 |
$@ ? :
|
|
540
|
0 |
0 |
defined $append ? :
|
|
613
|
0 |
0 |
if ($path eq '') { }
|
|
|
0 |
0 |
elsif ($path eq '/') { }
|
|
619
|
0 |
0 |
if ($path =~ m[^/])
|
|
623
|
0 |
0 |
if ($_ eq '..') { }
|
|
|
0 |
0 |
elsif ($_ eq '.') { }
|
|
|
0 |
0 |
elsif ($_ eq '~') { }
|
|
624
|
0 |
0 |
if $#real_ele
|
|
636
|
0 |
0 |
substr($path_out, 0, 1) eq '/' ? :
|
|
671
|
0 |
0 |
if $type_bin =~ /^01/
|
|
674
|
0 |
0 |
$curr_year eq $yr ? :
|
|
686
|
0 |
0 |
unless (exists $user{$uid})
|
|
687
|
0 |
0 |
if (defined $uid) { }
|
|
689
|
0 |
0 |
if ($obj) { }
|
|
708
|
0 |
0 |
unless (exists $group{$gid})
|
|
709
|
0 |
0 |
if (defined $gid) { }
|
|
711
|
0 |
0 |
if ($obj) { }
|