| line |
true |
false |
branch |
|
54
|
0 |
0 |
unless my $sj = 'Metabrik::String::Json'->new_from_brik_init($self) |
|
65
|
0 |
0 |
unless $self->brik_help_run_undef_arg('read', $input) |
|
69
|
0 |
0 |
unless my $data = $self->SUPER::read($input) |
|
79
|
0 |
0 |
unless $self->brik_help_run_undef_arg('read_next', $input) |
|
83
|
0 |
0 |
unless my $data = $self->SUPER::read_line($input) |
|
93
|
0 |
0 |
unless $self->brik_help_run_undef_arg('write', $json_hash) |
|
94
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('write', $json_hash, 'ARRAY', 'HASH') |
|
96
|
0 |
0 |
unless $self->brik_help_run_undef_arg('write', $output) |
|
101
|
0 |
0 |
ref $json_hash eq 'ARRAY' ? : |
|
105
|
0 |
0 |
unless my $data = $sj->encode($this) |
|
109
|
0 |
0 |
unless $self->SUPER::write(\@data, $output) |
|
119
|
0 |
0 |
unless $self->brik_help_run_undef_arg('is_valid', $input) |
|
121
|
0 |
0 |
unless my $data = $self->SUPER::read($input) |