Condition Coverage

blib/lib/Sys/Export/Unix/UserDB.pm
Criterion Covered Total %
condition 66 118 55.9


and 3 conditions

line !l l&&!r l&&r condition
26 12 0 1 @args == 1 && isa_hash($args[0])
102 1 0 2 -f $passwd_file && -f $group_file && -f $shadow_file
271 17 6 6 $_->groups->{$grnam} && ($_->group // '') ne $grnam
393 0 0 0 $self->auto_import and not $self->{'users'}{$name}
412 0 0 0 $self->auto_import and not $self->{'groups'}{$name}
429 10 3 3 not $u and $self->auto_import
448 63 2 4 not $g and $self->auto_import
503 0 0 0 $self->{'groups'}{$_} and $user->add_group($_)

or 2 conditions

line l !l condition
158 0 4 ($options{'format'} // $self->{'default_format'}) // "Linux"
181 6 0 0 chmod $mode, $name or croak "chmod($name, $mode): $!"
207 0 7 $users{$r{'name'}} //= \%r
210 2 0 $files->{'shadow'} // ""
250 5 0 $user->passwd // "*"
4 1 _time_to_days_since_1970($user->pw_change_time) // ""
1 4 $user->pw_min_days // ""
1 4 $user->pw_max_days // ""
1 4 $user->pw_warn_days // ""
0 5 $user->pw_inactive_days // ""
0 5 _time_to_days_since_1970($user->expire_time) // ""
261 7 2 $user->gecos // ""
7 2 $user->dir // ""
7 2 $user->shell // ""
272 5 7 $g->passwd // "*"
320 3 0 $attrs{'group'} //= "nogroup"
321 2 1 $attrs{'groups'} //= {}
431 2 0 $self->auto_import->user($spec) // (return undef)
434 0 0 getpwuid $spec // (return undef)
450 3 0 $self->auto_import->group($spec) // (return undef)
453 0 0 getgrgid $spec // (return undef)

or 3 conditions

line l !l&&r !l&&!r condition
121 0 9 0 $group_by_name{$_->{'name'}} //= $_
122 0 9 0 $group_by_gid{$_->{'gid'}} //= $_
125 0 7 0 $user_by_name{$_->{'name'}} //= $_
158 0 0 4 $options{'format'} // $self->{'default_format'}
170 2 2 2 $_ eq 'passwd' || $_ eq 'group'
281 2 1 0 ref $name_or_obj or length $name_or_obj
282 0 2 1 isa_hash $name_or_obj or &isa_user($name_or_obj)
309 0 0 0 $gid == $pw->uid or $pw->uid < 1000
360 3 1 0 ref $name_or_obj or length $name_or_obj
361 0 3 1 isa_hash $name_or_obj or &isa_group($name_or_obj)
389 0 1 14 isa_hash $name_or_obj or &isa_user($name_or_obj)
408 0 1 13 isa_hash $name_or_obj or &isa_group($name_or_obj)
506 1 23 0 $self->{'uids'}{$uid} //= $user
523 1 25 0 $self->{'gids'}{$gid} //= $group
572 0 0 14 @val > 1 or not ref $val[0]
612 0 0 0 exists $known_attrs{$attr} or exists $self->{$attr}
657 15 0 0 exists $known_attrs{$attr} or exists $self->{$attr}