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"} |