| line |
true |
false |
branch |
|
46
|
4 |
0 |
unless $@ |
|
51
|
0 |
0 |
if not exists $$self{$key} or $key =~ /^_/ |
|
64
|
2 |
20 |
if (defined $uri) |
|
73
|
1 |
1 |
if (defined $key) |
|
83
|
1 |
1 |
if (defined $version) |
|
84
|
1 |
0 |
unless $$self{'_versions'}{$version} |
|
94
|
2 |
38 |
if (defined $format) |
|
95
|
0 |
2 |
unless $$self{'_formats'}{$format} |
|
98
|
1 |
1 |
if 'perl' eq $format |
|
109
|
2 |
1 |
if (defined $cache and $cache =~ /\d+/) |
|
118
|
2 |
0 |
if (defined $debug) |
|
127
|
0 |
3 |
unless $word |
|
135
|
0 |
2 |
unless exists $parameters{$_} and exists $parameters{$_}{$args{$_}} |
|
149
|
0 |
2 |
unless $word |
|
154
|
0 |
1 |
unless exists $parameters{$_} and $args{$_} =~ /\d+/ |
|
168
|
0 |
3 |
unless $word |
|
191
|
1 |
1 |
if ('count' eq $_) { } |
|
|
1 |
0 |
elsif ('ARRAY' eq ref $args{'partOfSpeech'}) { } |
|
192
|
0 |
1 |
unless $args{'count'} =~ /\d/ |
|
198
|
0 |
11 |
unless exists $parameters{'partOfSpeech'}{$type} |
|
214
|
0 |
1 |
unless $word |
|
224
|
0 |
2 |
unless $word |
|
242
|
1 |
1 |
if keys %args |
|
244
|
1 |
1 |
if (exists $args{'type'}) |
|
245
|
1 |
0 |
if ('ARRAY' eq ref $args{'type'}) { } |
|
248
|
0 |
9 |
unless exists $parameters{'type'}{$type} |
|
258
|
0 |
2 |
if (exists $args{'limit'}) |
|
259
|
0 |
0 |
if (0 >= $args{'limit'}) |
|
262
|
0 |
0 |
if exists $args{'type'} |
|
272
|
0 |
1 |
unless $word |
|
282
|
0 |
1 |
unless $word |
|
292
|
0 |
3 |
unless $word |
|
300
|
0 |
2 |
unless exists $parameters{$_} and $args{$_} =~ /\d+/ |
|
323
|
0 |
1 |
unless exists $parameters{$_} and exists $parameters{$_}{$args{$_}} |
|
340
|
1 |
18 |
'perl' eq $self->format ? : |
|
341
|
18 |
1 |
defined $query ? : |
|
349
|
18 |
0 |
if $$self{'debug'} |
|
352
|
0 |
0 |
if ($self->cache and exists $$self{'_cache'}{'requests'}{$request}) { } |
|
362
|
0 |
0 |
if 'perl' eq $self->format |
|
372
|
0 |
0 |
if $response->is_success or $response->is_redirect |
|
376
|
0 |
0 |
if $response->is_error or $response->is_info |
|
385
|
0 |
1 |
unless $c and 'ARRAY' eq ref $$c{'data'} |
|
388
|
0 |
1 |
unless 'ARRAY' eq ref $oldest |
|
399
|
0 |
1 |
unless $c |
|
412
|
0 |
0 |
unless $c |
|
414
|
0 |
0 |
if @{$$c{'data'};} >= $$c{'max'} |
|
422
|
0 |
1 |
unless $$self{'_json'} |