blib/lib/SeeAlso/Source/BeaconAggregator/Publisher.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 23 | 186 | 12.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
169 | 0 | 0 | 0 | defined $expanded and $expanded ne '' |
181 | 0 | 0 | 2 | @_ and not ref $_[0] |
182 | 0 | 0 | 2 | @_ and not ref $_[0] |
184 | 0 | 0 | 2 | @_ and not ref $_[0] |
185 | 0 | 0 | 2 | @_ && ref $_[0] |
209 | 2 | 0 | 0 | $osd{'Examples'} and ref $osd{'Examples'} |
247 | 1 | 0 | 1 | $revisit and $revisit =~ /^[+-]?\d+$/ |
1 | 0 | 1 | $revisit and $revisit =~ /^[+-]?\d+$/ and $revisit > 0 | |
431 | 0 | 0 | 0 | $onerow->[11] and exists $self->{'aliasfilter'}{$onerow->[11]} |
437 | 0 | 0 | 0 | $clusterid and ref $c |
721 | 0 | 0 | 0 | $lastseq and $onerow->{'seqno'} == $lastseq |
777 | 0 | 0 | 0 | $clusterid and ref $c |
787 | 0 | 0 | 0 | $repos->{'ALTTARGET'} and $vary->{'altid'} |
821 | 0 | 0 | 0 | $hits and not $rlabel =~ /%s/ |
861 | 0 | 0 | 0 | $clusterid and ref $c |
871 | 0 | 0 | 0 | $repos->{'ALTTARGET'} and $vary->{'altid'} |
886 | 0 | 0 | 0 | $vary->{'hits'} and $vary->{'hits'} != 1 |
line | l | !l | condition |
---|---|---|---|
238 | 0 | 1 | $beaconmeta{'REVISIT'} || $Defaults{'REVISIT'} || '' |
275 | 0 | 2 | $admref->{'IDENTIFIER_CLASS'} || '' |
362 | 0 | 0 | $server->{'formats'}{$format} || {} |
368 | 0 | 0 | $formatprops->{'type'} || 'text/html' |
0 | 0 | $formatprops->{'charset'} || 'UTF-8' | |
0 | 0 | $server->{'expires'} || '+1h' | |
427 | 0 | 0 | $self->{'identifierClass'} || undef |
458 | 0 | 0 | $onerow->[9] || $onerow->[10] || $onerow->[11] || '???' |
459 | 0 | 0 | $onerow->[2] || '...' |
487 | 0 | 0 | $beaconmeta->{'PREFIX'} || '' |
575 | 0 | 0 | $server->{'formats'}{$format} || {} |
593 | 0 | 0 | $self->{'identifierClass'} || undef |
659 | 0 | 0 | $hitsref->[0] || 0 |
662 | 0 | 0 | $beaconmeta->{'PREFIX'} || '' |
663 | 0 | 0 | $beaconmeta->{'NAME'} || $osd->{'ShortName'} || '' |
690 | 0 | 0 | $idlist{$_} || 'variantid' |
802 | 0 | 0 | $repos->{'NAME'} || '' |
0 | 0 | $repos->{'DESCRIPTION'} || '' | |
0 | 0 | $repos->{'INSTITUTION'} || '' | |
809 | 0 | 0 | $repos->{'MESSAGE'} || shift @labels || '???' |
812 | 0 | 0 | pop @labels || '' |
836 | 0 | 0 | $repos->{'NAME'} || '' |
0 | 0 | $repos->{'DESCRIPTION'} || '' | |
0 | 0 | $repos->{'INSTITUTION'} || '' | |
837 | 0 | 0 | $repos->{'MESSAGE'} || shift @labels || '???' |
838 | 0 | 0 | pop @labels || '' |
946 | 0 | 0 | $beaconmeta->{'DESCRIPTION'} || $osd->{'Description'} || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
166 | 0 | 0 | 0 | $c->hash($row->[0]) || $c->value($row->[0]) |
183 | 0 | 2 | 0 | $uAformatname ||= $Defaults{'uAformatname'} |
223 | 0 | 0 | 2 | $beaconmeta{'FORMAT'} || $Defaults{'FORMAT'} |
224 | 0 | 0 | 2 | $beaconmeta{'VERSION'} || $Defaults{'VERSION'} |
236 | 0 | 0 | 2 | $preset->{'TIMESTAMP'} || $osd{'DateModified'} || $^T |
250 | 0 | 2 | 0 | $beaconmeta{'FEED'} ||= "$cgibase?format=" . $Defaults{'beaconformatname'} |
251 | 0 | 0 | 2 | $beaconmeta{'EXAMPLES'} ||= join('|', @osdexamples) |
252 | 0 | 0 | 2 | $self->{'Contact'} || $osd{'Contact'} |
0 | 0 | 2 | $beaconmeta{'CONTACT'} ||= $self->{'Contact'} || $osd{'Contact'} | |
253 | 0 | 0 | 2 | $self->{'Description'} || $osd{'Description'} |
0 | 0 | 2 | $beaconmeta{'DESCRIPTION'} ||= $self->{'Description'} || $osd{'Description'} | |
254 | 0 | 0 | 2 | $self->{'ShortName'} || $osd{'ShortName'} |
0 | 0 | 2 | $beaconmeta{'NAME'} ||= $self->{'ShortName'} || $osd{'ShortName'} | |
441 | 0 | 0 | 0 | $c->hash($h) || $c->value($h) || $h |
447 | 0 | 0 | 0 | $onerow->[6] || $onerow->[5] |
0 | 0 | 0 | $uri ||= sprintf($onerow->[6] || $onerow->[5], $p, SeeAlso::Source::BeaconAggregator::urlpseudoescape($onerow->[1])) | |
451 | 0 | 0 | 0 | $uri ||= sprintf($onerow->[5], $p) |
519 | 0 | 0 | 0 | $_->[4] || $_->[2] |
576 | 0 | 0 | 0 | $server->{'cgi'} || 'CGI'->new |
603 | 0 | 0 | 0 | $c->hash($h) || $c->value($h) |
617 | 0 | 0 | 0 | $c->hash($clusterid) || $c->value($clusterid) |
631 | 0 | 0 | 0 | $c->hash($v) || $c->value($v) |
758 | 0 | 0 | 0 | $meta->{'_alias'} || $meta->{'_seqno'} |
781 | 0 | 0 | 0 | $c->hash($h) || $c->value($h) || $h |
815 | 0 | 0 | 0 | $vary->{'info'} || $label |
865 | 0 | 0 | 0 | $c->hash($h) || $c->value($h) || $h |
890 | 0 | 0 | 0 | $vary->{'info'} || "[$cnt.]" |