Branch Coverage

blib/lib/CGI/Application/Plugin/PageLookup/Menu.pm
Criterion Covered Total %
branch 14 22 63.6


line true false branch
163 4 6 if (scalar @params == 1) { }
177 0 128 unless shift()
182 0 128 unless defined $dlineage
187 0 128 unless defined $tlineage
196 14 114 unless exists $$self{'work_to_be_done'}
208 0 128 unless $sth->execute
220 0 128 if $sth->err
252 376 114 if $$self{'template'}->query('name', [@new_tlineage, $var]) eq 'VAR'
257 0 114 if $the_rest =~ s/\s*:\s*([_a-z]\w*)\s*$//
258 0 114 unless $the_rest =~ /^structure/
285 0 4 if (scalar @params == 1) { }