Branch Coverage

blib/lib/Unix/Mgt.pm
Criterion Covered Total %
branch 14 120 11.6


line true false branch
155 0 0 if ($err_id) { }
200 4 2 if (@_ % 2) { }
228 0 0 unless $cmd
236 0 0 if ($rv)
264 0 0 if (defined $$use_bsd)
314 4 0 if (defined $name)
337 2 4 if (nocontent($name))
366 0 0 if (ref $class)
372 0 0 if ($class eq 'Unix::Mgt::User') { }
0 0 elsif ($class eq 'Unix::Mgt::Group') { }
380 0 0 if ($only)
382 0 0 if (ref $name)
386 0 0 if (nocontent($name))
389 0 0 unless (exists $$only{$name})
417 0 0 unless $name
420 0 0 if (my(@fields) = $class->fields($name)) { }
532 1 3 unless $name
538 2 1 if (@fields) { }
576 0 0 unless (@fields)
604 0 3 if ($name =~ /^\d+$/s) { }
647 0 0 unless $name
650 0 0 if ($class->fields($name))
661 0 0 if ($class->use_bsd) { }
680 0 0 if ($opts{'system'})
688 0 0 unless $class->run_cmd('error-creating-user', @cmd)
761 0 0 unless $entry
828 0 0 if (@_)
836 0 0 if ($user->use_bsd) { }
857 0 0 unless $user->run_cmd("usermod-error-$field", @cmd)
910 0 0 if (defined $new_group)
917 0 0 if ($user->use_bsd) { }
939 0 0 unless $success
944 0 0 unless defined $gid
950 0 0 if ($opts{'object'}) { }
989 0 0 if (my $member_str = $group{'members'})
997 0 0 if (exists $members{$$user{'name'}})
1007 0 0 unless ($opts{'object'})
1077 0 0 if ($user->use_bsd) { }
1135 0 0 if ($user->use_bsd) { }
1146 0 0 unless $user->run_cmd('error-deleting-user', 'userdel', $user->name)
1228 0 1 if ($name =~ /^\d+$/s) { }
1269 1 1 unless $name
1275 0 1 if (@fields) { }
1327 0 0 unless $name
1330 0 0 if ($class->fields($name))
1341 0 0 if ($class->use_bsd) { }
1356 0 0 if ($opts{'system'})
1364 0 0 unless $class->run_cmd('error-creating-group', @cmd)
1430 0 0 unless $entry
1458 0 0 unless (@fields)
1551 0 0 if (defined $user{'gid'} and $user{'gid'} eq $gid)
1557 0 0 if ($opts{'object'}) { }
1602 0 0 unless defined $members_str
1607 0 0 if (hascontent($name))
1614 0 0 if ($opts{'object'}) { }
1656 0 0 unless (ref $user)
1695 0 0 if (my(@primaries) = $group->primary_members)
1707 0 0 if (@primaries > 1) { }
1721 0 0 if ($group->use_bsd) { }
1732 0 0 unless $group->run_cmd('error-deleting-group', 'groupdel', $group->name)