Branch Coverage

blib/lib/Unix/Mgt.pm
Criterion Covered Total %
branch 14 96 14.5


line true false branch
122 0 0 if ($err_id) { }
167 4 2 if (@_ % 2) { }
195 0 0 unless $cmd
203 0 0 if ($rv)
255 4 0 if (defined $name)
278 2 4 if (nocontent($name))
307 0 0 if (ref $class)
313 0 0 if ($class eq 'Unix::Mgt::User') { }
0 0 elsif ($class eq 'Unix::Mgt::Group') { }
321 0 0 if ($only)
323 0 0 if (ref $name)
327 0 0 if (nocontent($name))
330 0 0 unless (exists $$only{$name})
358 0 0 unless $name
361 0 0 if (my(@fields) = $class->fields($name)) { }
473 1 3 unless $name
479 2 1 if (@fields) { }
517 0 0 unless (@fields)
545 0 3 if ($name =~ /^\d+$/s) { }
588 0 0 unless $name
591 0 0 if ($class->fields($name))
606 0 0 if ($opts{'system'})
613 0 0 unless $class->run_cmd('error-creating-user', 'adduser', @cmd)
686 0 0 unless $entry
753 0 0 if (@_)
768 0 0 unless $user->run_cmd("usermod-error-$field", 'usermod', @cmd)
821 0 0 if (defined $new_group)
837 0 0 unless $success
842 0 0 unless defined $gid
848 0 0 if ($opts{'object'}) { }
887 0 0 if (my $member_str = $group{'members'})
895 0 0 if (exists $members{$$user{'name'}})
905 0 0 unless ($opts{'object'})
1065 0 1 if ($name =~ /^\d+$/s) { }
1106 1 1 unless $name
1112 0 1 if (@fields) { }
1164 0 0 unless $name
1167 0 0 if ($class->fields($name))
1182 0 0 if ($opts{'system'})
1189 0 0 unless $class->run_cmd('error-creating-user', 'groupadd', @cmd)
1255 0 0 unless $entry
1283 0 0 unless (@fields)
1376 0 0 if (defined $user{'gid'} and $user{'gid'} eq $gid)
1382 0 0 if ($opts{'object'}) { }
1427 0 0 unless defined $members_str
1432 0 0 if (hascontent($name))
1439 0 0 if ($opts{'object'}) { }
1481 0 0 unless (ref $user)