| line |
true |
false |
branch |
|
29
|
2 |
12 |
unless (defined wantarray)
|
|
37
|
1 |
11 |
unless defined $target_dir
|
|
38
|
1 |
11 |
unless -d $target_dir
|
|
42
|
11 |
0 |
if ($tainted_orig =~ /$options->{'untaint_pattern'}/) { }
|
|
50
|
11 |
0 |
$target_dir ? :
|
|
51
|
0 |
11 |
if $@
|
|
54
|
11 |
0 |
if ($tainted_dest =~ /$options->{'untaint_pattern'}/) { }
|
|
61
|
10 |
1 |
if ($dest ne $orig)
|
|
62
|
0 |
10 |
unless chdir $dest
|
|
80
|
2 |
4 |
unless (defined wantarray)
|
|
88
|
0 |
4 |
if $@
|
|
99
|
2 |
3 |
unless $self->{'_tempd'}
|
|
100
|
1 |
2 |
if (@_ == 0) { }
|
|
104
|
1 |
1 |
$_[0] ? :
|
|
117
|
11 |
0 |
if $orig
|
|
118
|
3 |
8 |
if ($self->{'_tempd'} and not $self->{'_preserve'})
|
|
127
|
0 |
3 |
if $err
|