Branch Coverage

File:/home/mik/work/module/Tivoli/AccessManager/Admin/ACL.pm
Coverage:98.7%

line%coveragebranch
26100TFunless (defined $cont and UNIVERSAL::isa($cont, 'Tivoli::AccessManager::Admin::Context'))
33100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
48100TFif ($name) { }
63100TFif (ref $class) { }
7150TFif $resp->isok
89100TFunless ($self->exist)
96100TFif (@groups) { }
111100TFunless ($self->exist)
118100TFif (@users) { }
131100TFunless (ref $self)
133100TFunless (defined $pd and UNIVERSAL::isa($pd, 'Tivoli::AccessManager::Admin::Context'))
141100TFif ($$self{'exist'})
162100TFunless ($self->exist)
168100TFif $rc
180100TFif (@_ == 1) { }
100TFelsif (@_ % 2) { }
100TFelsif (@_) { }
194100TFif ($desc)
199100TFif ($resp->isok)
227100TFif (@_ % 2)
233100TFunless ($self->exist)
241100TFif ($opts{'action'} eq 'user' || $opts{'action'} eq 'group' and not defined $opts{'name'})
247100TFif (defined $opts{'perms'})
248100TFif ($opts{'perms'} eq 'remove') { }
256100TFif ($resp->isok)
278100TFif (ref $$vals{$key}) { }
281100TFunless $resp->isok
287100TFunless $resp->isok
302100TFif (ref $$vals{$key}) { }
305100TFunless $resp->isok
311100TFunless $resp->isok
325100TFunless $resp->isok
340100TFif (@_ % 2)
347100TFunless ($self->exist)
354100TFif (defined $opts{$op})
356100TFunless $resp->isok