Branch Coverage

blib/lib/Unix/Mgt.pm
Criterion Covered Total %
branch 15 148 10.1


line true false branch
121 0 0 if ($err_id) { }
128 0 0 if ($err_id) { }
173 4 2 if (@_ % 2) { }
201 0 0 unless $cmd
209 0 0 if ($rv)
237 0 1 if (defined $$use_bsd)
290 4 0 if (defined $name)
315 2 4 if (nocontent($name))
344 0 0 if (ref $class)
350 0 0 if ($class eq 'Unix::Mgt::User') { }
0 0 elsif ($class eq 'Unix::Mgt::Group') { }
358 0 0 if ($only)
360 0 0 if (ref $name)
364 0 0 if (nocontent($name))
367 0 0 unless (exists $only->{$name})
395 0 0 unless $name
398 0 0 if (my(@fields) = $class->fields($name)) { }
518 1 3 unless $name
524 2 1 if (@fields) { }
562 0 0 unless (@fields)
590 0 3 if ($name =~ /^\d+$/s) { }
633 0 0 unless $name
636 0 0 if ($class->fields($name))
647 0 0 if ($class->use_bsd) { }
666 0 0 if ($opts{'system'})
674 0 0 unless $class->run_cmd('error-creating-user', @cmd)
747 0 0 unless $entry
820 0 0 if (@_)
828 0 0 if ($user->use_bsd) { }
854 0 0 unless $user->run_cmd("usermod-error-$field", @cmd)
907 0 0 if (defined $new_group)
914 0 0 if ($user->use_bsd) { }
937 0 0 unless $success
942 0 0 unless defined $gid
948 0 0 if ($opts{'object'}) { }
987 0 0 if (my $member_str = $group{'members'})
995 0 0 if (exists $members{$user->{'name'}})
1005 0 0 unless ($opts{'object'})
1075 0 0 if ($user->use_bsd) { }
1135 0 0 if ($user->use_bsd) { }
1153 0 0 unless $user->run_cmd('error-deleting-user', @args)
1177 0 0 unless $env_path
1192 0 0 if ($@)
1198 0 0 unless (defined $default_str)
1224 0 0 unless @defaults_arr
1233 0 0 if ($lib eq '.')
1237 0 0 unless (exists $defaults{$lib})
1272 0 0 unless (defined $paths_in)
1276 0 0 if (ref $paths_in) { }
1288 0 0 unless (@paths)
1302 0 0 if (my $new_libs = new_libs())
1337 0 0 unless ($tests)
1342 0 0 if ($single) { }
1383 0 0 unless ($tests->{'-e'} = -e $path)
1482 0 1 if ($name =~ /^\d+$/s) { }
1529 1 1 unless $name
1535 0 1 if (@fields) { }
1587 0 0 unless $name
1590 0 0 if ($class->fields($name))
1601 0 0 if ($class->use_bsd) { }
1616 0 0 if ($opts{'system'})
1624 0 0 unless $class->run_cmd('error-creating-group', @cmd)
1690 0 0 unless $entry
1718 0 0 unless (@fields)
1811 0 0 if (defined $user{'gid'} and $user{'gid'} eq $gid)
1817 0 0 if ($opts{'object'}) { }
1862 0 0 unless defined $members_str
1867 0 0 if (hascontent($name))
1874 0 0 if ($opts{'object'}) { }
1916 0 0 unless (ref $user)
1956 0 0 if (my(@primaries) = $group->primary_members)
1968 0 0 if (@primaries > 1) { }
1982 0 0 if ($group->use_bsd) { }
2000 0 0 unless $group->run_cmd('error-deleting-group', @cmd)