Make salt detection more robust.
This commit is contained in:
parent
a3a426cfb5
commit
22f6a2b271
@ -598,7 +598,7 @@ END
|
|||||||
my $saltlen;
|
my $saltlen;
|
||||||
while (<IN>)
|
while (<IN>)
|
||||||
{
|
{
|
||||||
if (/^\s*#\s*salt\s+len:\s+(\d+)\s+$/i)
|
if (/^\s*#\s*salt\s+len:\s+(\d+)\s*$/i)
|
||||||
{
|
{
|
||||||
my $sl = $1;
|
my $sl = $1;
|
||||||
print STDERR "$req salt length $sl\n" if $debug;
|
print STDERR "$req salt length $sl\n" if $debug;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user