Condition Coverage

blib/lib/SeeAlso/Server.pm
Criterion Covered Total %
condition 28 49 57.1


and 3 conditions

line !l l&&!r l&&r condition
30 5 6 0 defined $cgi and not UNIVERSAL::isa($cgi, 'CGI')
130 0 0 20 defined $source and UNIVERSAL::isa($source, 'SeeAlso::Source')
154 20 0 0 $format eq 'debug' and $$self{'debug'} == -1
155 4 16 0 $format eq 'seealso' and $$self{'debug'} == 1
184 0 14 0 defined $response and not UNIVERSAL::isa($response, 'SeeAlso::Response')
192 11 4 1 $callback and not $callback =~ /^[a-zA-Z0-9\._\[\]]+$/
328 1 0 13 $format and $name ne 'debug'
357 0 0 0 $source and UNIVERSAL::isa($source, 'SeeAlso::Source')

or 2 conditions

line l !l condition
35 6 5 $cgi || undef
0 11 $params{'xslt'} || undef
0 11 $params{'clientbase'} || undef
0 11 $params{'debug'} || 0
1 10 $params{'idtype'} || 'SeeAlso::Identifier'

or 3 conditions

line l !l&&r !l&&!r condition
58 0 0 2 $name eq 'seealso' or $name eq 'debug'
66 0 1 0 ref $$format{'filter'} eq 'CODE' or ref $$format{'method'} eq 'CODE'
169 14 0 3 $format eq 'seealso' or $format eq 'debug'
14 2 1 $format eq 'seealso' or $format eq 'debug' or not $$self{'formats'}{$format}
2 0 1 $format eq 'seealso' or $format eq 'debug' or not $$self{'formats'}{$format} or $$self{'formats'}{$format}{'filter'}