Begriff :: readpassword.

Bitten Sie den Benutzer für ein Passwort.
Jetzt downloaden

Begriff :: readpassword. Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Tom Phoenix
  • Website des Verlags:
  • http://search.cpan.org/~phoenix/

Begriff :: readpassword. Stichworte


Begriff :: readpassword. Beschreibung

Den Benutzer für ein Passwort fragen. Begriff :: ReadPassword ist ein Perl-Modul, mit dem der Benutzer für ein Passwort gefragt werden kann. Synopsis verwenden Begriff :: readpassword; während (1) {mein $ password = read_password ('Passwort:'); Wiederholen, es sei denn, $ Kennwort definiert; if ($ Kennwort EQ 'Flubber') {drucken "Zugriff erteilt. "; zuletzt;} else {drucken" Zugriff abgelehnt. "; redo;}} Mit diesem Modul können Sie den Benutzer auf traditionelle Weise für ein Passwort auf der traditionellen Art von der Tastatur bitten, ohne Echoing, ohne Echo Dieses Modul sollte im Allgemeinen in Verbindung mit der Crypting-Funktion von Perl verwendet werden, die separat verkauft wird. Die Read_Password-Funktionsaufforderungen für den Eingabe, liest eine Textzeile von der Tastatur an und gibt anschließend diese Zeile an den Anrufer zurück. Die Textzeile enthält nicht Das NEWLINE-Zeichen, so dass der Benutzer keine Notwendigkeit nutzen muss (falls vorhanden). Der Zeichen Cr (oder das Zeichen LF) signalisiert das Ende des Eingangs, wodurch der angesammelte Eingangspuffer zurückgegeben wird. Control-U leert den Eingangspuffer. Und gegebenenfalls kann der Zeichensteuer-C sein verwendet, um den Eingabevorgang zu beenden. (Siehe Details unten.) Alle anderen Zeichen, sogar diejenigen, die normalerweise spezielle Zwecke haben würden, werden dem Eingabepuffer hinzugefügt. Es wird jedoch nicht empfohlen, dass Sie die as-noch nicht angegebenen Steuerzeichen in Ihren Kennwörtern verwenden, wie Diese Charaktere können in einer zukünftigen Version dieses Moduls sinnvoll sein. Anwendungen, mit denen der Benutzer ihre eigenen Passwörter einstellen kann, können diese Regel möglicherweise durchsetzen, vielleicht mit dem Code so etwas: {# nackte Block für Scoping und Wiederholen meines $ new_pw = read_password ("Geben Sie Ihr neues Passwort ein: eingeben:"); if ($ new_pw = ~ / () /) {mein $ bad = entpacken "h *", 1 $; drucken "Ihr Passwort darf nicht das enthalten"; drucken "Charakter mit dem Hex-Code $ schlecht. "; Redo;} ELSIF (Länge ($ new_pw) <5) {drucken" Ihr Passwort muss länger sein! "; Redo;} ELSIF ($ new_pw ne read_password (erneut eingeben:")) {drucken "Passwörter stimmen nicht überein. "; redo;} else {change_password ($ new_pw); drucken" Ihr Passwort wird jetzt geändert. ";}} Der zweite Parameter zum read_password ist der optionale dehre_timeout-Wert. Wenn es sich um eine Null-Null-Zahl handelt, und für diese viele Sekunden gibt es keinen Tastatureingang. Beachten Sie, dass dies kein Gesamtfrist ist, Da der Timer mit jedem neuen Zeichen neu gestartet wird. Der dritte Parameter ermöglicht optional, dass der Eingabevorgang vom Benutzer mit CONTROL-C abgeschlossen wird. Wenn dies nicht mitgeliefert wird, oder falsch ist, wird ein typisierter Control-C in das eingegeben Eingabepuffer genauso wie ein anderer Zeichen. In diesem Fall gibt es keinen Weg von der Tastatur, um das Programm zu beenden, während er auf die Eingabe wartet. (Das heißt, die normale Fähigkeit, Signale von der Tastatur zu erzeugen, wird während des Anrufs suspendiert zum read_password Wenn etwas) getippt wurde Erz Die frühzeitige Kündigung, oder warum der Eingabestopersatz beendet wurde Und ob der Eingangsbetrieb normal endet oder nicht, ein NEWLINE-Zeichen wird gedruckt, so dass der Cursor nach der Eingabeaufforderung nicht in der Zeile bleibt. Anforderungen: · Perl.


Begriff :: readpassword. Zugehörige Software