Branch Coverage

blib/lib/Tags/HTML/Page/Begin.pm
Criterion Covered Total %
branch 54 54 100.0


line true false branch
103 1 31 if (ref $self->{'css_src'} ne "ARRAY")
107 1 3 if (ref $css_src_hr ne "HASH")
111 1 3 if (&none(sub { $key eq $_; } , "link", "media"))
119 1 28 unless (defined $self->{'charset'})
124 2 26 if (ref $self->{'script_js'} ne "ARRAY")
129 2 24 if (ref $self->{'script_js_src'} ne "ARRAY")
134 1 23 if (defined $self->{'favicon'} and not $self->{'favicon'} =~ /\.(ico|png|jpg|gif|svg)$/ms)
147 2 18 if ($self->{'css'})
149 1 1 if ($css ne '') { }
165 19 1 if (defined $self->{'http_equiv_content_type'})
174 2 18 if (defined $self->{'base_href'})
179 1 1 defined $self->{'base_target'} ? :
184 1 19 unless (defined $self->{'http_equiv_content_type'})
198 1 19 if (defined $self->{'refresh'})
209 1 19 if (@{$self->{'script_js'};})
219 1 19 if (@{$self->{'script_js_src'};})
233 19 1 defined $self->{'lang'}{'title'} ? :
1 19 defined $css ? :
246 1 19 if (@{$self->{'css_src'};})
253 1 1 $css_src_hr->{'media'} ? :
261 1 19 if (defined $self->{'rss'})
293 15 5 unless (defined $self->{'favicon'})
299 1 4 if ($suffix eq 'ico') { }
1 3 elsif ($suffix eq 'png') { }
1 2 elsif ($suffix eq 'svg') { }
1 1 elsif ($suffix eq 'gif') { }
325 121 19 unless (defined $self->{$key})