Branch Coverage

script/jsonfold.pl
Criterion Covered Total %
branch 9 28 32.1


line true false branch
17 0 0 if $^S
69 0 1 unless &GetOptions("demo", \$opt{'demo'}, "verbose|v", \$opt{'verbose'}, "help|h", \$opt{'help'}, "input|i=s", \$opt{'input'}, "compact=s", \$opt{'compact'}, "indent=i", \$opt{'indent'}, "native", \$opt{'native'}, "sort-keys!", \$cfg{'sort_keys'}, "width=i", \$cfg{'width'}, "pack-items=i", \$cfg{'pack_items'}, "pack-array-items=i", \$cfg{'pack_array_items'}, "pack-obj-items=i", \$cfg{'pack_obj_items'}, "pack-nesting=i", \$cfg{'pack_nesting'}, "fold-items=i", \$cfg{'fold_items'}, "fold-array-items=i", \$cfg{'fold_array_items'}, "fold-obj-items=i", \$cfg{'fold_obj_items'}, "fold-nesting=i", \$cfg{'fold_nesting'}, "join-items=i", \$cfg{'join_items'}, "join-array-items=i", \$cfg{'join_array_items'}, "join-obj-items=i", \$cfg{'join_obj_items'}, "join-nesting=i", \$cfg{'join_nesting'})
96 0 1 if (defined $input) { }
97 0 0 unless open my $fh, "<:encoding(UTF-8)", $input
100 0 0 unless close $fh
118 3 0 unless defined $v
145 0 0 unless -t STDOUT
150 0 0 if $cols
160 0 1 if ($opt->{'help'})
168 0 1 $opt->{'demo'} ? :
169 0 1 if -t STDOUT
175 0 1 if $verbose
176 0 1 if $verbose
180 0 1 if $verbose