| line |
true |
false |
branch |
|
99
|
0 |
0 |
if ($self->dryrun) { }
|
|
107
|
0 |
0 |
unless ($success)
|
|
110
|
0 |
0 |
if ($err)
|
|
135
|
0 |
0 |
if (not defined $version) { }
|
|
140
|
0 |
0 |
if ($version eq 'latest') { }
|
|
165
|
0 |
0 |
if ($self->dryrun)
|
|
188
|
0 |
0 |
if (-f $logfile)
|
|
189
|
0 |
0 |
unless my $log = 'IO::File'->new($logfile, 'r')
|
|
200
|
0 |
0 |
unless $tmplog->close
|
|
202
|
0 |
0 |
unless ($self->dryrun)
|
|
203
|
0 |
0 |
unless rename $tmpname, $logfile
|
|
216
|
0 |
0 |
unless ($self->dryrun or -d $to_dir)
|
|
218
|
0 |
0 |
if ($@)
|
|
227
|
0 |
0 |
unless chmod $mode, $to_dir
|
|
240
|
0 |
0 |
if ($self->dryrun) { }
|
|
244
|
0 |
0 |
unless File::Copy::syscopy($from, $to)
|
|
247
|
0 |
0 |
unless chmod $mode, $to
|
|
248
|
0 |
0 |
unless utime $atime, $mtime, $to
|