Branch Coverage

blib/lib/Metabrik/Brik/Search.pm
Criterion Covered Total %
branch 0 92 0.0


line true false branch
34 0 0 unless (defined $self->context)
45 0 0 unless $context->used->{$brik}->can("brik_tags")
56 0 0 unless $context->not_used->{$brik}->can("brik_tags")
71 0 0 unless (defined $self->context)
75 0 0 unless $self->brik_help_run_undef_arg("string", $string)
83 0 0 unless $brik =~ /$string/
84 0 0 unless $context->used->{$brik}->can("brik_tags")
92 0 0 unless $brik =~ /$string/
93 0 0 unless $context->not_used->{$brik}->can("brik_tags")
106 0 0 unless (defined $self->context)
110 0 0 unless $self->brik_help_run_undef_arg("tag", $tag)
118 0 0 unless $context->used->{$brik}->can("brik_tags")
122 0 0 unless $this eq $tag
131 0 0 unless $context->not_used->{$brik}->can("brik_tags")
135 0 0 unless $this eq $tag
150 0 0 unless (defined $self->context)
154 0 0 unless $self->brik_help_run_undef_arg("not_tag", $tag)
162 0 0 unless $context->used->{$brik}->can("brik_tags")
166 0 0 if $this eq $tag
175 0 0 unless $context->not_used->{$brik}->can("brik_tags")
179 0 0 if $this eq $tag
204 0 0 unless (defined $self->context)
221 0 0 if exists $core->{$brik}
222 0 0 if ($available->{$brik}->can("brik_properties"))
225 0 0 if $module =~ /^Metabrik/
238 0 0 unless (defined $self->context)
242 0 0 unless $self->brik_help_run_undef_arg("command", $command)
250 0 0 if (exists $context->used->{$brik}->brik_properties->{'commands'})
251 0 0 unless $context->used->{$brik}->can("brik_tags")
255 0 0 if ($key =~ /$command/i)
265 0 0 if (exists $context->not_used->{$brik}->brik_properties->{'commands'})
266 0 0 unless $context->not_used->{$brik}->can("brik_tags")
270 0 0 if ($key =~ /$command/i)
285 0 0 unless (defined $self->context)
289 0 0 unless $self->brik_help_run_undef_arg("category", $category)
297 0 0 unless defined $context->used->{$brik}
298 0 0 unless $context->used->{$brik}->can("brik_category")
300 0 0 unless $brik_category eq $category
301 0 0 unless $context->used->{$brik}->can("brik_tags")
310 0 0 unless defined $context->not_used->{$brik}
311 0 0 unless $context->not_used->{$brik}->can("brik_category")
313 0 0 unless $brik_category eq $category
314 0 0 unless $context->not_used->{$brik}->can("brik_tags")
327 0 0 unless (defined $self->context)
337 0 0 if (@t == 2) { }
0 0 elsif (@t == 3) { }