Perl crypt パスワード 暗号化について

$FORM = "password"; #入力されたPASS

$ANGO = crypt ($FORM,"PS"); #入力されたPASSを暗号化

$PASS = 'PSL1o1zMHdUNY'; #暗号化したPASSを予め設定

if ($PASS eq $ANGO){$view = "正しいパスワードです。";}
else{$view = "パスワードが違います。";}

print "・結果：$view\n・暗号：$ANGO\n・パス：$FORM";

出力結果・・・
・結果：正しいパスワードです。
・暗号：PSL1o1zMHdUNY
・パス：password

この入力されたパスワードが
「password」ならOK
「passwor」はNG
「password321」はOK

crypt関数は8文字までとかなのでしょうか・・・？
10文字とかにする方法はないでしょうか？
※入力されるのは１つのテキストボックスから
　<input type="password" name="pass">

No.2 回答者： kmee 回答日時： 2017/09/01 20:04

疑問があったら、人に聞く前に、まずはマニュアルを確認しましょう。

Perlのマニュアルは比較的充実していて詳細まで書いてあるし、
日本語訳も進んでいます。
「perldoc 知りたいこと」
と、perldoc を付けて検索すれば、見つけやすいです。


http://perldoc.jp/func/crypt
より
> crypt PLAINTEXT,SALT
> 伝統的には (略) PLAINTEXT の最初の 8 バイトだけが意味があります。
> より頑強なアルゴリズムについては Digest モジュールを参照してください。

No.1 回答者： Tacosan 回答日時： 2017/09/01 14:08

自分で作ればいい.