Branch Coverage

blib/lib/Passwd/Samba.pm
Criterion Covered Total %
branch 1 38 2.6


line true false branch
22 0 1 defined $params{'smbpasswd'} ? :
28 0 0 scalar @_ && ref $_[0] eq 'Passwd::Samba' ? :
30 0 0 unless defined $val
36 0 0 scalar @_ && ref $_[0] eq 'Passwd::Samba' ? :
41 0 0 if /^[^:]+:/o
56 0 0 scalar @_ && ref $_[0] eq 'Passwd::Samba' ? :
57 0 0 unless defined $_[1]
62 0 0 if /^[^:]+:/o
66 0 0 if grep {/^$_[1]:/;} @a
78 0 0 scalar @_ && ref $_[0] eq 'Passwd::Samba' ? :
81 0 0 if (not defined $_[1]) { }
83 0 0 if /^$_[0]:/
88 0 0 if (/^[^:]+:/o)
89 0 0 if (/^$_[0]:/) { }
106 0 0 scalar @_ && ref $_[0] eq 'Passwd::Samba' ? :
112 0 0 $tmp > $max ? :
121 0 0 scalar @_ && ref $_[0] eq 'Passwd::Samba' ? :
124 0 0 unless defined $passwd
138 0 0 scalar @_ && ref $_[0] eq 'Passwd::Samba' ? :