line |
true |
false |
branch |
223
|
8 |
14 |
if -d $_ |
224
|
14 |
8 |
if -f $_ |
255
|
0 |
1 |
if ($self->{'Continue'}) { } |
265
|
0 |
0 |
if ($dir =~ /^(.+?)\Q$self->{'Separator'}\E([0-9]+)$/) |
267
|
0 |
0 |
if ($prefix eq $self->{'Prefix'} and length $suffix == $self->{'Length'} and $suffix > $continue) |
315
|
0 |
7 |
if ($seen{$basename}) { } |
338
|
0 |
7 |
if ($seen{$basename}) { } |
354
|
0 |
9 |
defined $seen ? : |
356
|
0 |
9 |
if (-e $target_path) |
357
|
0 |
0 |
unless -d $target_path |
361
|
9 |
0 |
if (File::Path::mkpath($target_path, $self->{'Verbose'})) { } |
379
|
0 |
14 |
if (-e $target_file and not $self->{'Override'}) |
384
|
14 |
0 |
if (File::Copy::copy($source_file, $target_file)) { } |
385
|
0 |
14 |
if $self->{'Verbose'} |
398
|
0 |
0 |
unless opendir my $dh, $dir |
400
|
0 |
0 |
unless closedir $dh |
407
|
0 |
0 |
unless exists $self->{'track'} |
429
|
0 |
0 |
unless $self->{'exists'} |
|
0 |
0 |
if (@{[] unless $self->{'exists'};}) |
439
|
0 |
0 |
unless $self->{'failure'}{'copy'} |
|
0 |
0 |
if (@{[] unless $self->{'failure'}{'copy'};}) |