line |
true |
false |
branch |
117
|
0 |
0 |
if (exists $arg{$argname}) { } |
|
0 |
0 |
elsif ($caller_is_obj) { } |
148
|
0 |
0 |
if (@_) |
168
|
0 |
0 |
if (@_) |
191
|
0 |
0 |
unless open FH, $self->get_dict |
195
|
0 |
0 |
unless $word =~ /^[a-z]+$/ |
203
|
0 |
0 |
if ($self->get_word_lengths_allowed) |
205
|
0 |
0 |
unless exists $$allowed_ref{length $_} |
209
|
0 |
0 |
if ($self->get_word_lengths_not_allowed) |
211
|
0 |
0 |
if exists $$not_allowed_ref{length $_} |
225
|
0 |
0 |
if ($length == 1) |
235
|
0 |
0 |
if $el =~ /(\w)\1+/ |
261
|
0 |
0 |
if (@_) { } |
278
|
0 |
0 |
if $i == $j |
298
|
0 |
0 |
if (@_) { } |
309
|
0 |
0 |
unless open FH, $self->get_dict |
313
|
0 |
0 |
unless $word =~ /^[a-z]+$/ |
314
|
0 |
0 |
if length $word ne length $$self{'word'} |
321
|
0 |
0 |
if ($$self{'key'} eq $key) |
343
|
0 |
0 |
if (@_) { } |
353
|
0 |
0 |
unless open FH, $self->get_dict |
357
|
0 |
0 |
unless $word =~ /^[a-z]+$/ |
358
|
0 |
0 |
if length $word ne length $$self{'word'} |
360
|
0 |
0 |
if ($word =~ /$$self{'word_regex'}/) |
379
|
0 |
0 |
if ($Games::Jumble::AUTOLOAD =~ /.*::get(_\w+)/ and $self->_accessible($1, 'read')) |
386
|
0 |
0 |
if ($Games::Jumble::AUTOLOAD =~ /.*::set(_\w+)/ and $self->_accessible($1, 'write')) |