TERM :: readpassword. ユーザーにパスワードを求める。
今すぐダウンロード

TERM :: readpassword. ランキングとまとめ

TERM :: readpassword. タグ

パスワード Perlモジュール パール 読む パスワードを尋ねる ユーザーのパスワード

TERM :: readpassword. 説明

ユーザーにパスワードを求める。 TERM :: READPASSWORD PASSWERS.SYNOPSISを使用してユーザーに尋ねるために使用できるPerlモジュールです。間（1）{My $ password = read_password（ 'password：'）;定義された$ PASSWORDの場合を除き、REDO。 （$ PASSWORDEQ 'flubber'）{印刷 "アクセスが許可されている場合。 「; else {print "アクセスが拒否されました。 "; redo;}このモジュールは、エコーがなくなり、従来の方法でパスワードをキーボードからユーザーに尋ねることができます。これはWeb上での使用を意図していません。Web上のユーザー認証は完全に別の問題です。また、このモジュールは、一般的にPerlのcrypt（）関数、別売りで販売されている。改行キャラクターは、Chompを使用する必要はありません。ユーザーがテキストを入力している、いくつかの特殊文字が処理されます。文字削除（または文字バックスペース）は1文字ずつ、入力バッファ内の最後の文字を削除します。 （いずれかの場合）。文字CR（または文字LF）は入力の終わりを通知し、累積入力バッファを返す。Control-Uは入力バッファを空にします。そして、任意選択で、文字制御Cは入力操作を終了するために使用されます。 （下記の詳細を参照。）他のすべての文字、通常特別な目的を持つものでさえ、入力バッファに追加されます。これらの文字は、このモジュールの将来のバージョンで意味があるかもしれません。ユーザーが自分のパスワードを設定できるようにするアプリケーションは、このルールを強制することができます。{＃裸のブロック：{＃裸のブロック、REDO MY $ NEW_PW = READ_PASSWORD（「新しいパスワードを入力します。」）; （$ new_pw =〜/ /（）/）{My $ BAD = UNPACK "H *"、$ 1; 「パスワードには含まれていない場合があります」という印刷。 「16進コード付きの文字」を印刷する。 "; redo; elsif（長さ（$ new_pw）<5）{印刷"あなたのパスワードはそれより長くなければなりません！ "; redo; elsif（$ new_pw ne read_password（"再び "）{印刷すると）{印刷すると）{印刷すると一致しません。 "; else {change_password（$ new_pw）; print"あなたのパスワードが変更されました。 read_passwordの2番目のパラメータは、オプションのIDLE_TIMEOUT値です。ゼロ以外の番号で、その数秒のキーボード入力がない場合、入力操作は終了します。これは全体的な制限時間ではないことに注意してください。タイマーが各文字で再起動されると、第3のパラメータはオプションで入力操作をControl-Cを使用してユーザーによって終了させることを可能にします。これが指定されていない場合、またはfalseの場合、型付けされたControl-Cが入力されます。入力バッファーのように他の文字として。その場合、入力を待っている間はプログラムを終了するためにキーボードからの方法はありません。（つまり、キーボードからの信号を生成する通常の機能は通話中に中断されます。 read_passwordに。）入力操作が早く終了した場合（またはControl-Cが有効になっていて入力されたために入力されたため）、戻り値はundefになります。どちらの場合も、何を発見するための方法はありません（何でも）入力された場合早期の終了、または入力操作が終了したのか、または入力操作が終了しました。プロンプト以外の場所を除いて、ユーザーがパスワードを入力できないように、プロンプトが表示される前に「先に入力」された入力は破棄されます。そして、入力操作が正常に終了するかどうか、改行文字が印刷され、プロンプトの後に行が残りません。要件： ・Perl

TERM :: readpassword. 関連ソフトウェア