| line |
true |
false |
branch |
|
25
|
21 |
3 |
unless (defined $self->{'size'}) |
|
26
|
21 |
0 |
if (defined $self->{'data'}) { } |
|
|
0 |
0 |
elsif (defined $self->{'temp_path'} and -f $self->{'temp_path'}) { } |
|
49
|
0 |
3 |
unless $filename |
|
76
|
3 |
2 |
if ($self->is_in_memory) { } |
|
|
2 |
0 |
elsif ($self->is_on_disk) { } |
|
80
|
0 |
2 |
unless open my $fh, "<:raw", $self->{'temp_path'} |
|
91
|
1 |
0 |
if ($self->is_in_memory) { } |
|
|
0 |
0 |
elsif ($self->is_on_disk) { } |
|
93
|
0 |
1 |
unless open my $fh, "<", \$self->{'data'} |
|
97
|
0 |
0 |
unless open my $fh, "<:raw", $self->{'temp_path'} |
|
109
|
0 |
2 |
if ($dir and not -d $dir) |
|
114
|
1 |
1 |
if ($self->is_in_memory) { } |
|
|
1 |
0 |
elsif ($self->is_on_disk) { } |
|
116
|
0 |
1 |
unless open my $fh, ">:raw", $destination |
|
128
|
0 |
1 |
unless move($self->{'temp_path'}, $destination) |
|
144
|
2 |
22 |
if $self->{'_cleaned_up'} |
|
146
|
2 |
20 |
if ($self->is_on_disk and -f $self->{'temp_path'}) |