| line |
true |
false |
branch |
|
27
|
1 |
5 |
unless ref(my $self = shift()) |
|
29
|
2 |
3 |
unless defined $$self{'searchstring'} |
|
36
|
1 |
3 |
unless ref(my $self = shift()) |
|
38
|
1 |
2 |
unless defined(my $searchstring = shift()) |
|
40
|
1 |
1 |
if ($searchstring eq '') |
|
49
|
1 |
7 |
unless ref(my $either = shift()) |
|
51
|
5 |
2 |
if ($$either{'language'} eq '') { } |
|
60
|
1 |
5 |
unless ref(my $self = shift()) |
|
63
|
1 |
4 |
if (not defined $language) { } |
|
66
|
1 |
3 |
unless grep {$language eq $_;} $self->languages |
|
68
|
1 |
2 |
if ($language eq 'all') { } |
|
80
|
0 |
4 |
unless ref(my $self = shift()) |
|
82
|
3 |
1 |
if (exists $$self{'languages'}) { } |
|
95
|
1 |
5 |
unless ref(my $self = shift()) |
|
102
|
1 |
6 |
unless ref(my $self = shift()) |
|
105
|
1 |
5 |
unless (defined $num_results) |
|
109
|
3 |
2 |
unless ($num_results =~ /^\d+$/) |
|
110
|
1 |
1 |
if ($num_results < 1) |
|
117
|
1 |
2 |
unless ref(my $self = shift()) |
|
122
|
0 |
1 |
if ($self->has_results) |
|
127
|
0 |
1 |
if ($language ne 'all') { } |
|
133
|
1 |
0 |
if ($self->num_results <= 100) { } |
|
137
|
0 |
0 |
if ($num_results % 100 == 0) |
|
144
|
0 |
14 |
if ($results_left <= 0) |
|
145
|
0 |
14 |
if (/^(\d{1,5})\. /) |
|
159
|
1 |
4 |
unless ref(my $self = shift()) |
|
162
|
1 |
3 |
unless (ref $options eq 'HASH') |
|
163
|
1 |
2 |
unless (exists $$options{'url'}) |
|
164
|
1 |
1 |
unless (exists $$options{'position'}) |
|
177
|
1 |
3 |
unless ref(my $self = shift()) |
|
179
|
1 |
2 |
if ($self->has_results) |
|
188
|
0 |
0 |
unless ref(my $self = shift()) |
|
190
|
0 |
0 |
unless ($self->has_results) |
|
196
|
1 |
9 |
unless ref(my $self = shift()) |
|
198
|
3 |
6 |
if (exists $$self{'results'}) { } |
|
207
|
1 |
2 |
unless ref(my $self = shift()) |
|
209
|
1 |
1 |
if ($self->has_results) { } |
|
219
|
0 |
0 |
unless ref(my $self = shift()) |
|
221
|
0 |
0 |
unless defined(my $requested_result = shift()) |
|
223
|
0 |
0 |
unless ($self->has_results) |
|
229
|
0 |
0 |
unless ref(my $self = shift()) |
|
231
|
0 |
0 |
unless defined(my $string = shift()) |
|
233
|
0 |
0 |
unless ($self->has_results) |
|
235
|
0 |
0 |
if ($_->url =~ /$string/) |
|
244
|
0 |
0 |
unless ref(my $self = shift()) |
|
246
|
0 |
0 |
unless defined(my $string = shift()) |
|
248
|
0 |
0 |
unless ($self->has_results) |
|
254
|
0 |
0 |
if (scalar @return == 0) |
|
260
|
0 |
0 |
unless ref(my $self = shift()) |
|
262
|
0 |
0 |
unless defined(my $string = shift()) |
|
264
|
0 |
0 |
unless ($self->has_results) |
|
267
|
0 |
0 |
if ($_->url =~ /$string/) |
|
271
|
0 |
0 |
if (scalar @return == 0) |