;
ok $ppr;
is $ppr->hash_hex, lc($hash_hex);
is $ppr->hash, $hash;
eval { $ppr->passphrase }; isnt $@, "";
is $ppr->as_crypt, "\$LM\$".lc($hash_hex);
is $ppr->as_rfc2307, "{CRYPT}\$LM\$".lc($has
ounds;
is $ppr->salt_base64_4, $salt;
is $ppr->hash_base64, $hash;
eval { $ppr->passphrase };
isnt $@, "";
is $ppr->as_crypt, "_".$nrounds.$salt.$hash;
is $ppr->as_rfc2307, "{CRYPT}_".$nrounds.$