| line |
true |
false |
branch |
|
30
|
0 |
0 |
unless defined $file_name |
|
35
|
0 |
0 |
$extension ne '' ? : |
|
39
|
0 |
0 |
if (exists $self->{'IMPORT_EXPORT_HANDLERS'}{$type}{'IMPORT'} and defined $self->{'IMPORT_EXPORT_HANDLERS'}{$type}{'IMPORT'}) { } |
|
59
|
0 |
0 |
if (-e $file_name and -s $file_name) { } |
|
65
|
0 |
0 |
if ($@) |
|
120
|
0 |
0 |
unless defined $new_self |
|
134
|
0 |
0 |
unless defined $file_name |
|
136
|
0 |
0 |
unless my $elements = CORE::do $file_name |
|
137
|
0 |
0 |
unless defined $path |
|
141
|
0 |
0 |
unless my $new_element_type = ref $new_element |
|
143
|
0 |
0 |
unless (exists $self->{'LOADED_TYPES'}{$new_element_type}) |
|
146
|
0 |
0 |
if $@ |
|
157
|
0 |
0 |
if (exists $new_element->{'NAME'}) |
|
159
|
0 |
0 |
if (exists $self->{'ELEMENT_TYPES_BY_NAME'}{$new_element->{'NAME'}}) { } |
|
174
|
0 |
0 |
if (exists $new_element->{'X'}) |
|
189
|
0 |
0 |
if (defined $name and $name ne "") |
|
193
|
0 |
0 |
if (defined $file_name and $file_name ne "") |
|
195
|
0 |
0 |
if (-e $file_name) |
|
203
|
0 |
0 |
unless $override eq "yes" |
|
207
|
0 |
0 |
if (defined $file_name and $file_name ne "") |
|
275
|
0 |
0 |
if (exists $self->{'IMPORT_EXPORT_HANDLERS'}{$type}{'EXPORT'} and defined $self->{'IMPORT_EXPORT_HANDLERS'}{$type}{'EXPORT'}) { } |
|
291
|
0 |
0 |
if ($self->{'CREATE_BACKUP'} and -e $file_name) |
|
294
|
0 |
0 |
unless copy($file_name, "$file_name.bak") |
|
298
|
0 |
0 |
unless write_file($file_name, &compress($self->serialize_self . '$VAR1 ;')) |