| line |
true |
false |
branch |
|
56
|
0 |
0 |
unless my $sj = "Metabrik::String::Json"->new_from_brik_init($self) |
|
67
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read", $input) |
|
72
|
0 |
0 |
unless my $data = $self->SUPER::read($input) |
|
82
|
0 |
0 |
unless $self->brik_help_run_undef_arg("read_next", $input) |
|
87
|
0 |
0 |
unless my $data = $self->SUPER::read_line($input) |
|
97
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $json_hash) |
|
98
|
0 |
0 |
unless $self->brik_help_run_invalid_arg("write", $json_hash, "ARRAY", "HASH") |
|
100
|
0 |
0 |
unless $self->brik_help_run_undef_arg("write", $output) |
|
106
|
0 |
0 |
ref $json_hash eq 'ARRAY' ? : |
|
110
|
0 |
0 |
unless my $data = $sj->encode($this) |
|
114
|
0 |
0 |
unless $self->SUPER::write(\@data, $output) |
|
124
|
0 |
0 |
unless $self->brik_help_run_undef_arg("is_valid", $input) |
|
126
|
0 |
0 |
unless my $data = $self->SUPER::read($input) |