| line |
true |
false |
branch |
|
53
|
0 |
0 |
if (@args <= 0) |
|
54
|
0 |
0 |
unless $self->brik_help_run_undef_arg("search", undef) |
|
63
|
0 |
0 |
unless my $si = "Metabrik::String::Uri"->new_from_brik_init($self) |
|
64
|
0 |
0 |
unless $keywords = $si->encode($keywords) |
|
66
|
0 |
0 |
if ($language eq 'fr' or $language eq 'uk' or $language eq 'de' or $language eq 'ch') { } |
|
81
|
0 |
0 |
if ($language eq "uk") |
|
86
|
0 |
0 |
if ($start < 0) |
|
94
|
0 |
0 |
unless my $get = $self->get($search) |
|
95
|
0 |
0 |
if ($get->{'code'} == 200) |
|
96
|
0 |
0 |
unless my $tree = $self->parse($get->{'content'}) |
|
108
|
0 |
0 |
if ($_->{'title'} =~ /^@{[$cache->{$language}];}/i) { } |
|
134
|
0 |
0 |
if (ref $this eq "HTML::Element") |
|
136
|
0 |
0 |
if ($tag eq "a") |
|
138
|
0 |
0 |
if ($h and keys %$h > 0) |
|
163
|
0 |
0 |
if ($href =~ m[^/url\?q=]) { } |
|
169
|
0 |
0 |
if (ref $_ eq 'HTML::Element') { } |
|
170
|
0 |
0 |
if (defined $_->content) { } |
|
187
|
0 |
0 |
unless my $sh = "Metabrik::String::Html"->new_from_brik_init($self) |
|
188
|
0 |
0 |
unless my $si = "Metabrik::String::Uri"->new_from_brik_init($self) |