Branch Coverage

blib/lib/Gnuplot/Builder/Script.pm
Criterion Covered Total %
branch 67 80 83.7


line true false branch
18 19 1158 if (@set_args)
30 38 3 if (defined $key) { }
78 0 75 unless defined $name
90 0 11 unless defined $name
103 45 217 unless defined $raw_key
106 181 36 if ($prefix eq 'o') { }
36 0 elsif ($prefix eq 'd') { }
107 162 19 defined $value ? :
109 27 9 defined $value ? :
124 256 6 unless $statement =~ /\n$/
154 1 1011 unless (defined $parent)
159 0 1011 unless (builtin::blessed($parent) and $parent->isa("Gnuplot::Builder::Script"))
182 72 19 if (not $ref) { }
185 0 19 unless ($dataset->can("params_string") and $dataset->can("write_data_to"))
201 34 2 if defined $_
202 7 31 unless @nonempty_data
217 8 11 unless $$data_written_ref
218 5 6 unless $$ended_with_newline_ref
225 12 147 if (defined $output_filename)
235 0 76 unless defined $dataset
236 19 57 if (ref $dataset ne "ARRAY")
239 0 76 unless @$dataset
256 65 359 exists $hash_ref->{$_} ? :
282 0 30 unless defined $do
283 0 30 if ref $do ne "CODE"
289 1 28 if ($$data_written_ref and not $$ended_with_newline_ref)
294 9 21 defined $args{'option'} && $args{'option'} ne '' ? :
305 2 1 if (@_ == 2)
309 0 3 unless defined $code
310 0 3 if ref $code ne "CODE"
319 2 157 if (not defined $commands) { }
28 129 elsif (ref $commands ne 'ARRAY') { }
327 96 63 if not defined $_context_writer or builtin::refaddr($_context_writer) != builtin::refaddr($writer)
332 155 109 if (ref $command eq 'CODE') { }
337 106 3 unless $command =~ /\n$/
344 96 63 if (defined $got_writer) { }
63 0 elsif (defined $_context_writer) { }
361 105 213 exists $given_args_ref->{$key} ? :
374 3 263 if not $KNOWN_PLOTTING_OPTIONS{$arg_name}
392 0 241 unless defined $arg_name