line |
!l |
l&&!r |
l&&r |
condition |
141
|
143 |
1 |
3 |
$File::Copy::Recursive::RMTrgFil and -d $_[1] || -e $_[1] |
158
|
0 |
143 |
2 |
$path and not -d $path |
161
|
145 |
0 |
0 |
-l $_[0] and $File::Copy::Recursive::CopyLink |
|
143 |
0 |
2 |
-d $_[0] and -f $_[1] |
164
|
0 |
0 |
0 |
not -e $target and $File::Copy::Recursive::BdTrgWrn |
186
|
9 |
0 |
0 |
-l $_[0] and $File::Copy::Recursive::CopyLink |
199
|
13 |
0 |
0 |
$File::Copy::Recursive::RMTrgDir and -d $_[1] |
216
|
5 |
4 |
2 |
-e $_[1] and not -d $_[1] |
225
|
2 |
1 |
1 |
$File::Copy::Recursive::CPRFComp and not $globstar |
244
|
45 |
0 |
0 |
$File::Copy::Recursive::MaxDepth and $File::Copy::Recursive::MaxDepth =~ /^\d+$/ |
|
45 |
0 |
0 |
$File::Copy::Recursive::MaxDepth and $File::Copy::Recursive::MaxDepth =~ /^\d+$/ and $level >= $File::Copy::Recursive::MaxDepth |
255
|
0 |
0 |
0 |
$_ ne '.' && $_ ne '..' |
260
|
45 |
45 |
306 |
$_ ne '.' && $_ ne '..' |
268
|
171 |
0 |
135 |
-l $org and $File::Copy::Recursive::CopyLink |
271
|
45 |
90 |
0 |
not -e $target and $File::Copy::Recursive::BdTrgWrn |
278
|
36 |
0 |
0 |
not -w $org and $File::Copy::Recursive::KeepMode |
328
|
9 |
0 |
0 |
-l $_[0] and $File::Copy::Recursive::CopyLink |
356
|
58 |
0 |
0 |
not -d $newpth and $nofatal |
364
|
12 |
0 |
0 |
not -d $newpth and $nofatal |
374
|
3 |
0 |
185 |
-d _ && $orig_dev |
|
0 |
185 |
0 |
$^O ne 'MSWin32' and not $orig_ino |
424
|
0 |
0 |
6 |
-d _ and $orig_dev |
|
0 |
0 |
6 |
-d _ and $orig_dev and $orig_ino |
428
|
6 |
0 |
0 |
$force and 'File::Spec'->file_name_is_absolute($path) |
474
|
0 |
181 |
0 |
$^O ne 'MSWin32' and not $orig_ino |
488
|
4 |
0 |
1112 |
defined $cur_dev && defined $cur_ino |
line |
l |
!l |
condition |
243
|
37 |
0 |
mkdir $end, $File::Copy::Recursive::DirPerms or return |
303
|
0 |
0 |
fcopy($org, $new, $buf) or next |
304
|
0 |
0 |
fcopy($org, $new) or next |
307
|
0 |
0 |
fcopy($org, $new, $buf) or return |
308
|
135 |
0 |
fcopy($org, $new) or return |
355
|
9 |
0 |
mkdir $newpth, $File::Copy::Recursive::DirPerms or return |
363
|
10 |
0 |
mkdir $newpth, $File::Copy::Recursive::DirPerms or return |
489
|
0 |
4 |
$cur_dev ||= 'undef(path went away?)' |
490
|
0 |
4 |
$cur_ino ||= 'undef(path went away?)' |