Thanks Timo
Ill try again.
Regards
Brent Clark
On Sat, Mar 8, 2008 at 11:52 AM, Timo Sirainen <[EMAIL PROTECTED]> wrote:
> On Sat, 2008-03-08 at 11:27 +0200, Brent Clark wrote:
>
> > use Digest::SHA1;
> > use MIME::Base64;
> > $ctx = Digest::SHA1->new;
> > $ctx->add($passwd_string);
> > $ctx->add('salt');
> > my $salted = '{SSHA}' . encode_base64($ctx->digest . 'salt' ,'');
>
> This looks correct, and it also worked when I tried it.
>
> $passwd_string = "pass" produces:
>
> {SSHA}EfVjnyJSUVXLC0NXPuQhKDjHjYdzYWx0
>
> Which worked just fine when logging in.
>
>
