| line | % | coverage | branch |
|---|
| 74 | 50 | T | F | unless -d $file |
| 76 | 100 | T | F | if -d "$file/DEBIAN" |
| 77 | 100 | T | F | unless $file =~ m[/] |
| 92 | 100 | T | F | if (defined $pkg_root) |
| 94 | 50 | T | F | if $file =~ s/^\Q$pkg_root\E// |
| 114 | 100 | T | F | if defined $root |
| 117 | 50 | T | F | unless -d $file |
| 121 | 50 | T | F | unless -d $parent |
| 122 | 100 | T | F | if &check_files_are_the_same("debian", $parent) |
| 124 | 50 | T | F | unless $file =~ m[/] |
| 140 | 100 | T | F | if $file1 eq $file2 |
| 141 | 50 | T | F | unless -e $file1 and -e $file2 |
| 143 | 50 | T | F | if ($resolve_symlink) { } |
| 171 | 100 | T | F | if ($d eq '..') { } |
| 172 | 50 | T | F | if (scalar @new > 0 and $new[-1] ne '..') { } |
| 173 | 50 | T | F | if $new[-1] eq "" |
| 176 | 100 | T | F | if (not -l $parent) { } |
| 201 | 50 | T | F | unless defined $content |
| 202 | 100 | T | F | if ('File::Spec'->file_name_is_absolute($content)) { } |
| 227 | 100 | T | F | unless (defined $canon_pathname) |
| 228 | 50 | T | F | if $! == 2 |
| 232 | 100 | T | F | if $canon_pathname eq $canon_devnull |
| 233 | 50 | T | F | if $canon_pathname eq $canon_basedir |
| 234 | 100 | T | F | if $canon_pathname =~ m[^\Q$canon_basedir/\E] |
| 260 | 50 | T | F | unless $cmd |
| 261 | 50 | T | F | if ($cmd =~ m[/]) { } |
| 262 | 0 | T | F | if -x "$cmd" |
| 265 | 100 | T | F | if -x "$dir/$cmd" |
| 286 | 0 | T | F | if defined $filetype |
| 289 | 0 | T | F | if (defined $filetype) |
| 290 | 0 | T | F | if $control_file eq "" |
| 293 | 0 | T | F | if $control_file eq "" |
| 317 | 0 | T | F | if -f $f |
| 319 | 0 | T | F | if wantarray |
| 320 | 0 | T | F | if scalar @files |