Branch Coverage

blib/lib/UI/Various/Optionmenu.pm
Criterion Covered Total %
branch 14 14 100.0


line true false branch
70 1 4 unless (ref $_ eq "ARRAY")
79 8 2 if (ref $_ eq 'ARRAY') { }
81 1 7 if @$_ < 2
121 1 1 unless (ref $_ eq "CODE")
170 2 4 unless (defined $$_{"options"})
177 1 3 if (defined $$_{"_init"})
181 3 1 unless $opt->[1] eq $$_{"_init"}