Branch Coverage

blib/lib/Authen/Passphrase/NetscapeMail.pm
Criterion Covered Total %
branch 24 38 63.1


line true false branch
108 7 9 if ($attr eq 'salt') { }
1 8 elsif ($attr eq 'salt_random') { }
3 5 elsif ($attr eq 'hash') { }
3 2 elsif ($attr eq 'hash_hex') { }
2 0 elsif ($attr eq 'passphrase') { }
110 0 7 if exists $self->{'salt'}
111 0 7 unless $value =~ /\A[\x00-\xff]{32}\z/
116 0 1 if exists $self->{'salt'}
120 0 3 if exists $self->{'hash'} or defined $passphrase
122 0 3 unless $value =~ /\A[\x00-\xff]{16}\z/
127 0 3 if exists $self->{'hash'} or defined $passphrase
129 0 3 unless $value =~ /\A[0-9A-Fa-f]{32}\z/
135 0 2 if exists $self->{'hash'} or defined $passphrase
142 0 8 unless exists $self->{'salt'}
143 2 6 if defined $passphrase
144 0 8 unless exists $self->{'hash'}
160 1 0 if ($userpassword =~ /\A\{(?i:ns-mta-md5)\}/)
161 0 1 unless $userpassword =~ /\A\{.*?\}([0-9a-fA-F]{32})([!-~]{32})\z/
235 0 5 if $self->{'salt'} =~ /[^!-~]/