Branch Coverage

blib/lib/Text/PromptBalanced.pm
Criterion Covered Total %
branch 32 34 94.1


line true false branch
19 5 9 if (defined $config{'escape'} and not ref $config{'escape'})
29 19 2 unless defined $config{$key}{'ignore_in'}
30 0 2 if ref $config{$key}{'ignore_in'}
42 5 16 if $_ eq 'comment' and $config{$_}{'type'} eq 'to-eol'
43 5 11 if $_ eq 'escape'
53 4 17 if ($type eq 'balanced') { }
2 15 elsif ($type eq 'unbalanced') { }
5 10 elsif ($type eq 'to-eol') { }
5 5 elsif ($type eq 'toggle') { }
5 0 elsif ($type eq 'escape') { }
123 444 136 unless exists $$action{$char}
128 16 120 if ($escape == 1) { }
17 103 elsif ($$action{$char}{'type'} eq 'escape') { }
141 15 88 if ($$action{$char}{'type'} eq 'to-eol' and $$action{$char}{'name'} eq 'comment')
144 1 2 if $$state{$_} > 0
151 4 4 if $$state{$_} == 1
159 50 12 if $$state{$key} == 0