Branch Coverage

blib/lib/XML/NewsML_G2/Writer.pm
Criterion Covered Total %
branch 37 46 80.4


line true false branch
116 46 161 if ($creator->kind)
150 968 416 if (my $catalog = $scheme->catalog) { }
416 0 elsif ($scheme) { }
154 56 360 unless $cat
176 25 1 if (my $remote_info = $self->news_item->copyright_holder->remote_info)
178 25 0 if $remote_info->reluri
179 25 0 if $remote_info->href
180 25 0 if keys %args
192 0 32 if ($self->news_item->teaser)
230 53 19 if ($self->_root_item->embargo)
246 53 19 if ($self->_root_item->has_service)
258 53 19 if ($self->_root_item->embargo_text)
266 53 19 if ($self->_root_item->closing)
274 53 19 if ($self->_root_item->note)
283 0 72 if ($self->_root_item->doc_version > 1)
295 288 0 if ($self->_root_item->$attr)
306 159 159 unless $v->$attribute
324 0 1119 unless my $getter_setter = $self->scheme_manager->can($attr)
327 875 244 if &$getter_setter($self->scheme_manager)
350 2866 3671 if ($text) { }
0 3671 elsif ($cdata) { }
1189 2482 elsif ($name_text) { }
357 881 308 if ref $name_text and $name_text->can('name')