Branch Coverage

blib/lib/Crypt/SKey.pm
Criterion Covered Total %
branch 12 26 46.1


line true false branch
177 0 9 if $n < 0
178 0 9 if $cnt > $n
180 0 9 unless my $key = hash($seed . $passwd)
184 3 15 $Crypt::SKey::HEX ? :
187 3 6 wantarray ? :
207 0 0 unless @ARGV
213 0 0 if ($n =~ m[(.+)/(.+)])
214 0 0 unless defined $cnt
215 0 0 if $n < 0
227 0 0 if $cnt > 1
236 1340 5098 if ($Crypt::SKey::HASH eq 'MD5') { }
3758 1340 elsif ($Crypt::SKey::HASH eq 'SHA1') { }
1340 0 elsif ($Crypt::SKey::HASH eq 'MD4') { }