| line | % | coverage | branch |
|---|
| 44 | 0 | T | F | if ($opts{'chdir'}) |
| 67 | 0 | T | F | unless *$self->{'tar_input'} |
| 68 | 0 | T | F | if $file =~ m[^\Q$cwd\E/(.+)$] |
| 69 | 0 | T | F | unless print {*$self->{'tar_input'};} "$file\000" |
| 76 | 0 | T | F | if (*$self->{'chdir'}) |
| 79 | 0 | T | F | if not -l $testfile and -d _ |
| 87 | 0 | T | F | if (*$self->{'chdir'}) |
| 90 | 0 | T | F | if -l $testfile or not -d _ |
| 98 | 0 | T | F | unless close *$self->{'tar_input'} |
| 116 | 50 | T | F | unless (-e $dest) |
| 118 | 0 | T | F | unless mkdir $dest |
| 142 | 50 | T | F | unless $opts{'no_fixperms'} |
| 145 | 50 | T | F | if ($opts{'in_place'}) { } |
| 152 | 50 | T | F | unless (defined $canon_pathname) |
| 153 | 0 | T | F | if $! == 2 |
| 157 | 50 | T | F | if $canon_pathname eq $canon_devnull |
| 158 | 50 | T | F | if $canon_pathname eq $canon_basedir |
| 159 | 100 | T | F | if $canon_pathname =~ m[^\Q$canon_basedir/\E] |
| 169 | 50 | T | F | unless lstat $File::Find::name |
| 175 | 100 | T | F | unless (lstat $destpath) |
| 176 | 50 | T | F | if ($! == 2) { } |
| 183 | 100 | T | F | if ($dest_exists) |
| 184 | 100 | T | F | if ($dest_is_dir and $src_is_dir) { } |
| 50 | T | F | elsif ($dest_is_dir) { } |
| 187 | 50 | T | F | unless chmod $mode, $destpath |
| 189 | 50 | T | F | unless utime $atime, $mtime, $destpath |
| 195 | 0 | T | F | unless rmdir $destpath |
| 199 | 50 | T | F | unless unlink $destpath |
| 204 | 100 | T | F | if ($src_is_dir) |
| 207 | 50 | T | F | unless rename $File::Find::name, $destpath |
| 218 | 0 | T | F | unless opendir my $dir_dh, $tmp |
| 219 | 0 | T | F | if $_ ne "." |
| 224 | 0 | T | F | if (scalar @entries == 1 and not -l "$tmp/$entries[0]" and -d _) { } |
| 225 | 0 | T | F | unless rename "$tmp/$entries[0]", $dest |
| 229 | 0 | T | F | unless rename $tmp, $dest |