| line | % | coverage | branch |
|---|
| 57 | 0 | T | F | if ($opts{'chdir'}) |
| 82 | 0 | T | F | unless *$self->{'tar_input'} |
| 83 | 0 | T | F | if ($file =~ m[^\Q$cwd\E/(.+)$]) |
| 87 | 0 | T | F | unless print {*$self->{'tar_input'};} "$file\000" |
| 94 | 0 | T | F | if (*$self->{'chdir'}) |
| 97 | 0 | T | F | if not -l $testfile and -d _ |
| 105 | 0 | T | F | if (*$self->{'chdir'}) |
| 108 | 0 | T | F | if -l $testfile or not -d _ |
| 116 | 0 | T | F | unless close *$self->{'tar_input'} |
| 134 | 50 | T | F | unless (-e $dest) |
| 136 | 0 | T | F | unless mkdir $dest |
| 162 | 50 | T | F | unless $opts{'no_fixperms'} |
| 165 | 50 | T | F | if ($opts{'in_place'}) { } |
| 172 | 50 | T | F | unless (defined $canon_pathname) |
| 173 | 0 | T | F | if $! == 2 |
| 177 | 50 | T | F | if $canon_pathname eq $canon_devnull |
| 178 | 50 | T | F | if $canon_pathname eq $canon_basedir |
| 179 | 100 | T | F | if $canon_pathname =~ m[^\Q$canon_basedir/\E] |
| 189 | 50 | T | F | unless lstat $File::Find::name |
| 195 | 100 | T | F | unless (lstat $destpath) |
| 196 | 50 | T | F | if ($! == 2) { } |
| 203 | 100 | T | F | if ($dest_exists) |
| 204 | 100 | T | F | if ($dest_is_dir and $src_is_dir) { } |
| 50 | T | F | elsif ($dest_is_dir) { } |
| 207 | 50 | T | F | unless chmod $mode, $destpath |
| 209 | 50 | T | F | unless utime $atime, $mtime, $destpath |
| 215 | 0 | T | F | unless rmdir $destpath |
| 219 | 50 | T | F | unless unlink $destpath |
| 224 | 100 | T | F | if ($src_is_dir) |
| 227 | 50 | T | F | unless rename $File::Find::name, $destpath |
| 238 | 0 | T | F | unless opendir my $dir_dh, $tmp |
| 239 | 0 | T | F | if $_ ne "." |
| 244 | 0 | T | F | if (scalar @entries == 1 and not -l "$tmp/$entries[0]" and -d _) { } |
| 245 | 0 | T | F | unless rename "$tmp/$entries[0]", $dest |
| 249 | 0 | T | F | unless rename $tmp, $dest |