| line |
true |
false |
branch |
|
105
|
0 |
0 |
if $file_name =~ s/\?$// |
|
108
|
0 |
0 |
if -e $file_name |
|
111
|
0 |
0 |
unless ("File::Spec"->file_name_is_absolute($file_name)) |
|
115
|
0 |
0 |
if -e "File::Spec"->catfile($path, $file_name) |
|
120
|
0 |
0 |
unless $optional |
|
139
|
0 |
0 |
if $file eq "-" or not -f $file |
|
142
|
0 |
0 |
unless my($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = &Autom4te::FileUtils::stat($file) |
|
164
|
0 |
0 |
unless defined $force |
|
170
|
0 |
0 |
if ($to eq "-") |
|
179
|
0 |
0 |
unless unlink $from |
|
183
|
0 |
0 |
if (not $force and -f "$to" and compare("$from", "$to") == 0) |
|
187
|
0 |
0 |
unless unlink $from |
|
192
|
0 |
0 |
if (-f "$to") { } |
|
195
|
0 |
0 |
unless move("$to", "$to$SIMPLE_BACKUP_SUFFIX") |
|
197
|
0 |
0 |
unless move("$from", "$to") |
|
203
|
0 |
0 |
unless move("$from", "$to") |
|
222
|
0 |
0 |
unless defined $expected |
|
223
|
0 |
0 |
if (defined $hint) { } |
|
233
|
0 |
0 |
if ($!) { } |
|
241
|
0 |
0 |
if (WIFEXITED($?)) { } |
|
|
0 |
0 |
elsif (WIFSIGNALED($?)) { } |
|
245
|
0 |
0 |
unless $status == $expected |
|
278
|
0 |
0 |
if $? |
|
299
|
0 |
0 |
if system @command |
|
318
|
0 |
0 |
if system @command |
|
367
|
0 |
0 |
unless -f "$dirname/$file_name" |
|
374
|
0 |
0 |
unless (exists $_directory_cache{$dirname}) |
|
376
|
0 |
0 |
unless opendir DIR, $dirname |
|
405
|
0 |
0 |
if exists $_directory_cache{$dirname} |