| line |
true |
false |
branch |
|
23
|
0 |
106 |
unless my $self = $class->new_strict(@_) |
|
25
|
0 |
106 |
unless $self |
|
32
|
71 |
577 |
if ref $lang |
|
33
|
0 |
577 |
unless defined $lang |
|
36
|
577 |
0 |
if $class |
|
43
|
65 |
40 |
@_ ? : |
|
66
|
0 |
1 |
unless eval 'fc("1")' |
|
105
|
12 |
198 |
if fc $text eq fc $self->yes |
|
106
|
18 |
180 |
if fc $text eq fc $self->no |
|
107
|
12 |
168 |
if match($text, $self->yes_expr) |
|
108
|
30 |
138 |
if match($text, $self->no_expr) |
|
109
|
3 |
135 |
if $text eq 1 |
|
110
|
6 |
129 |
if $text eq 0 |
|
116
|
1 |
1 |
$_[1] ? : |
|
126
|
0 |
12 |
unless defined $yes_expr |
|
127
|
0 |
12 |
unless defined $no_expr |
|
173
|
63 |
113 |
if defined $r |