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) |