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) |