line | % | coverage | branch |
71 | 50 | T | F | if ($s =~ /^\s/) |
75 | 50 | T | F | if ($s =~ /\s$/) |
105 | 100 | T | F | if $file_name =~ s/\?$// |
108 | 100 | T | F | if -e $file_name |
111 | 50 | T | F | if (not 'File::Spec'->file_name_is_absolute($file_name)) |
115 | 100 | T | F | if -e 'File::Spec'->catfile($path, $file_name) |
120 | 50 | T | F | unless $optional |
139 | 100 | T | F | if $file eq '-' or not -f $file |
142 | 50 | T | F | unless my $stat = stat $file |
163 | 50 | T | F | unless defined $force |
169 | 50 | T | F | if ($to eq '-') |
178 | 0 | T | F | unless unlink $from |
182 | 100 | T | F | if (not $force and -f "$to" and compare("$from", "$to") == 0) |
186 | 50 | T | F | unless unlink $from |
191 | 100 | T | F | if (-f "$to") { } |
194 | 50 | T | F | unless move("$to", "$to$SIMPLE_BACKUP_SUFFIX") |
196 | 50 | T | F | unless move("$from", "$to") |
202 | 50 | T | F | unless move("$from", "$to") |
225 | 100 | T | F | if ($mtime < mtime $dep) |
249 | 50 | T | F | unless defined $expected |
250 | 50 | T | F | if (defined $hint) { } |
260 | 50 | T | F | if ($!) { } |
268 | 50 | T | F | if (WIFEXITED($?)) { } |
| 0 | T | F | elsif (WIFSIGNALED($?)) { } |
272 | 50 | T | F | unless $status == $expected |
305 | 0 | T | F | if $? |
326 | 100 | T | F | if system @command |
345 | 0 | T | F | if system @command |
394 | 0 | T | F | unless -f "$dirname/$file_name" |
401 | 0 | T | F | if (not exists $_directory_cache{$dirname}) |
403 | 0 | T | F | unless opendir DIR, $dirname |
431 | 0 | T | F | if exists $_directory_cache{$dirname} |