Branch Coverage

blib/lib/JSON/Karabiner.pm
Criterion Covered Total %
branch 23 30 76.6


line true false branch
16 4 33 if ($opts)
17 0 4 if (ref $opts ne 'HASH')
21 2 35 unless $title
22 1 34 unless $file
23 1 33 unless $file =~ /\.json$/
32 31 2 unless (-d $self->{'_mod_file_dir'})
33 2 29 if ($opts->{'mod_file_dir'}) { }
36 0 29 unless $ENV{'HARNESS_ACTIVE'}
63 4 3 if ($using_dsl)
65 4 0 unless (%main::saved_manips)
72 2 2 unless (defined $main::manip_sets{$current_manip_set}{'manipulators'})
94 0 4 unless ($s->{'_fake_write_flag'})
95 0 0 unless open FH, '>', $destination
100 0 4 unless $ENV{'HARNESS_ACTIVE'}
113 2 28 unless $desc