....
$ppr = Authen::Passphrase::SaltedDigest->new(
                algorithm => "SHA-1", salt_random => 20,
                passphrase => "passphrase");
....

##</code><code>##

$hash = $ppr->hash;