| line |
true |
false |
branch |
|
52
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read", $input) |
|
54
|
0 |
0 |
unless $self->open($input) |
|
55
|
0 |
0 |
unless my $data = $self->SUPER::read |
|
58
|
0 |
0 |
unless my $xml = "Metabrik::String::Xml"->new_from_brik_init($self) |
|
59
|
0 |
0 |
unless my $decode = $xml->decode($data) |
|
69
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $xml_hash) |
|
70
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $output) |
|
72
|
0 |
0 |
unless my $xml = "Metabrik::String::Xml"->new_from_brik_init($self) |
|
73
|
0 |
0 |
unless my $data = $xml->encode($xml_hash) |
|
75
|
0 |
0 |
unless my $fw = "Metabrik::File::Write"->new_from_brik_init($self) |
|
76
|
0 |
0 |
unless $fw->open($output) |
|
77
|
0 |
0 |
unless $fw->write($data) |