Branch Coverage

File:/home/mik/work/module/Tivoli/AccessManager/Admin/POP.pm
Coverage:98.8%

line%coveragebranch
45100TFunless $vector
4850TFunless $mask
49100TFif ($vector & $mask) == $mask
60100TFif ($day eq 'any')
73100TFunless $vector
75100TFif $vector == 15
78100TFif ($vector & $mask) == $mask
89100TFif ($level eq 'all') { }
100TFelsif ($level eq 'none') { }
98100TFunless (defined $revaudit{$level})
111100TFunless (defined $cont and UNIVERSAL::isa($cont, 'Tivoli::AccessManager::Admin::Context'))
115100TFif (@_ % 2)
128100TFif ($$self{'name'})
140100TFif (ref $class) { }
145100TFunless (defined $pd and UNIVERSAL::isa($pd, 'Tivoli::AccessManager::Admin::Context'))
151100TFunless (defined $self)
158100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
174100TFunless ($$self{'name'})
178100TFunless ($$self{'name'})
185100TFif ($resp->isok)
197100TFunless ($$self{'exist'})
204100TFif ($resp->isok)
215100TFif (@_) { }
216100TFref $_[0] ? :
230100TFif (@_) { }
231100TFref $_[0] ? :
23550TFunless $resp->isok
248100TFif $resp->isok
260100TFif (@_ % 2)
267100TFunless ($$self{'exist'})
275100TFif (defined $opts{$key})
277100TFif (ref $objs eq 'ARRAY') { }
279100TFref $obj ? :
280100TFunless $resp->isok
284100TFref $objs ? :
285100TFunless $resp->isok
291100TFif $resp->isok
301100TFif (ref $self) { }
31050TFif $resp->isok
319100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
332100TFunless ($$self{'exist'})
339100TFif (defined $level)
340100TFif ($level eq 'forbidden') { }
344100TFif $level eq 'unset'
347100TFif $resp->isok
351100TFif ($rc > 100000000 or $rc == 0) { }
100TFelsif ($rc == 1000) { }
358100TFif $resp->isok
367100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
383100TFunless ($$self{'exist'})
389100TFif ($desc)
391100TFif ($resp->isok)
394100TFunless $resp->isok
405100TFunless ($$self{'exist'})
411100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
428100TFif ($level)
431100TFif (ref $level) { }
100TFelsif ($level =~ /^-?\d+$/) { }
433100TFif ($vec == -1)
441100TFif ($level > 15 or $level < 0)
450100TFif ($vec == -1)
458100TFif $resp->isok
461100TFif ($resp->isok)
479100TFunless ($$self{'exist'})
485100TFif (@_ % 2)
493100TFunless defined $opts{$op}
495100TFunless (defined $opts{$op}{$ip}{'NETMASK'})
502100TFif ($op eq 'add')
503100TFunless (defined $opts{$op}{$ip}{'AUTHLEVEL'})
513100TFunless $resp->isok
529100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
545100TFunless ($$self{'exist'})
551100TFif ($qop)
552100TFunless ($qop eq 'none' or $qop eq 'integrity' or $qop eq 'privacy')
560100TFif $resp->isok
562100TFif $resp->isok
582100TFif (@_ % 2)
591100TFunless ($$self{'exist'})
597100TFif (defined $opts{'days'})
600100TFif (ref $opts{'days'}) { }
602100TFunless (defined $revtod{$tday} or $tday eq 'any')
611100TFif ($opts{'days'} > 127)
619100TFdefined $opts{'start'} ? :
620100TFdefined $opts{'end'} ? :
627100TFif $resp->isok
630100TFif ($resp->isok)
635100TF$list[3] ? :
647100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
660100TFunless ($$self{'exist'})
666100TFif (defined $mode)
667100TF$mode ? :
668100TFif $resp->isok
671100TFif $resp->isok
679100TFunless ($$self{'exist'})
698100TFif (ref $$opts{$key}) { }
701100TFunless $resp->isok
707100TFunless $resp->isok
722100TFif (ref $$opts{$key}) { }
725100TFunless $resp->isok
731100TFunless $resp->isok
744100TFif (ref $key eq 'ARRAY') { }
100TFelsif (ref $key) { }
758100TFunless $resp->isok
768100TFif (@_ % 2)
775100TFunless ($$self{'exist'})
781100TFif (defined $opts{'remove'})
783100TFunless $resp->isok
786100TFif (defined $opts{'removekey'})
788100TFunless $resp->isok
791100TFif (defined $opts{'add'})
793100TFunless $resp->isok
799100TFif ($resp->isok)