line |
true |
false |
branch |
56
|
0 |
0 |
if (ref $in[0] eq 'HASH') { } |
68
|
0 |
0 |
if ($in[0]{'follow_symlinks'}) |
72
|
0 |
0 |
if ($in[0]{'depth_first'}) |
93
|
0 |
0 |
unless -d $dir |
116
|
0 |
0 |
if (not -l $path) |
119
|
0 |
0 |
if (-f $path) { } |
|
0 |
0 |
elsif (-d $path) { } |
127
|
0 |
0 |
if $file_isa_match |
128
|
0 |
0 |
unless $path =~ /$match_re/ |
130
|
0 |
0 |
if (&File::chmod::Recursive::chmod($mode->{'match_files'}{$match_re}, $path)) |
141
|
0 |
0 |
if $verbose |
151
|
0 |
0 |
if $file_isa_match |
152
|
0 |
0 |
unless $path =~ /$match_re/ |
154
|
0 |
0 |
if (&File::chmod::Recursive::chmod($mode->{'match'}{$match_re}, $path)) |
165
|
0 |
0 |
if $verbose |
173
|
0 |
0 |
if (not $file_isa_match and $mode->{'files'} and &File::chmod::Recursive::chmod($mode->{'files'}, $path)) |
187
|
0 |
0 |
if $verbose |
201
|
0 |
0 |
if $dir_isa_match |
202
|
0 |
0 |
unless $path =~ /$match_re/ |
204
|
0 |
0 |
if (&File::chmod::Recursive::chmod($mode->{'match_dirs'}{$match_re}, $path)) |
215
|
0 |
0 |
if $verbose |
225
|
0 |
0 |
if $dir_isa_match |
226
|
0 |
0 |
unless $path =~ /$match_re/ |
228
|
0 |
0 |
if (&File::chmod::Recursive::chmod($mode->{'match'}{$match_re}, $path)) |
239
|
0 |
0 |
if $verbose |
247
|
0 |
0 |
if (not $dir_isa_match and $mode->{'dirs'} and &File::chmod::Recursive::chmod($mode->{'dirs'}, $path)) |
261
|
0 |
0 |
if $verbose |