funny action of crypt

[hara]

Hi

I have a problem when my apache_1.3.29 w/ mod_perl 1.29 runs PerlRun
and some CGI scripts with password encryption.

Script is ...

$password = crypt($password, &mkSalt($name.$password.$value) );

sub mkSalt {
  local($t, $sum, @salt ) = @_;
  @salt = split(//,
'./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz');
  if ($t) {
    $sum = unpack("%12C*", $t);
  } else { # ハンドルが空の場合
    return 'No';
  }
  $salt[$sum % 64] . $salt[int($sum/64) % 64];
}

While comparing local password file with password POSTed by users will not
be matched.

This script works fine without mod_perl but not with mod_perl..
But it was working fine with mod_perl.. But Suddenly stops working..

Is anybody can help me??

nh

-- 
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html