Πώς να Δημιουργήστε ένα τυχαίο κωδικό σας

Ανάπτυξη κωδικούς πρόσβασης για έναν μεγάλο αριθμό χρηστών είναι λιγότερο τρομακτικό έργο, αν μια τυχαία γεννήτρια κωδικού πρόσβασης χρησιμοποιείται . Οι κωδικοί πρόσβασης μπορούν να περιλαμβάνουν αλφαριθμητικούς χαρακτήρες , καθώς και σύμβολα , και να είναι τόσο χρονοβόρες όπως τις επιθυμίες του έργου. Τα τυχαία δημιουργία κωδικών πρόσβασης εκδίδονται συνήθως ως προεπιλογή για νέους χρήστες της αίτησης . Ένα σενάριο Perl που παράγει 7 κωδικούς πρόσβασης χαρακτήρα κατασκευασμένο από τυχαία σύμβολα , αριθμούς και γράμματα μπορούν να χρησιμοποιηθούν για την παραγωγή τυχαίων κωδικών πρόσβασης . Τα πράγματα που θα χρειαστείτε
editor PerlText , π.χ. Emacs , Πλαίσιο , Σημειωματάριο
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Πληκτρολογήστε το " she- bang» γραμμή . Αυτή είναι μια γραμμή κώδικα Perl που επιτρέπει ο διερμηνέας γνωρίζουν ότι αυτό που ονομάζεται είναι ένα script Perl . Αυτή η γραμμή κώδικα πηγαίνει στην κορυφή του σεναρίου . # ! /Usr /bin /perl 2

Εκχώρηση τιμές του πίνακα χαρακτήρων . Για να το κάνετε αυτό , θα χρειαστείτε τέσσερις διαφορετικές σειρές για τους τέσσερις τύπους χαρακτήρων στον κωδικό πρόσβασης . Οι πίνακες παρακάτω έχουν οριστεί στους αριθμούς 1 έως 9 , διάφορα σύμβολα χαρακτήρα , πεζά και κεφαλαία γράμματα @ num = ( 1 .. 9) ? . @ Char = ( '@' , '#' , '$' , ' % ' , ' ^ ' , ' & ' , ' * ' , ' \\ ( ',' \\ ) ') ? @ alph = ( ' a ' .. ' z ' ) ? @ alph_up = ( ' A ' .. ' Ζ ' ) ?
εικόνων 3

Ορίστε την τυχαία σειρά ανάθεση . Αυτή η συστοιχία συνδυάζει τα στοιχεία των συστοιχιών χαρακτήρα . Πρέπει να υπάρχουν 7 από αυτά, ώστε ορισμένοι τύποι χαρακτήρων θα εμφανιστούν με περισσότερες συχνότητα από ό, τι άλλες . . Η απόφαση του τι επιπλέον τύπους χαρακτήρων για να συμπεριλάβει γίνεται από τον κύριο του έργου @ αφήνει = ( @ ΑΓΑ , alph_up @ @ num , num @ @ char , alph @ @ num1 ) ?
Η 4

Ορισμός μεταβλητών κωδικό . Σε αυτό το απόσπασμα του κώδικα , κάθε χαρακτήρας του κωδικού πρόσβασης εκχωρείται μια τυχαιοποιημένη αξία μέσω της " int rand " εντολή που επιλέγει αυτόματα τα στοιχεία σε κάθε συστοιχία $ rand_let1 = $ αφήνει [ int rand @ αφήνει ] ? . $ Rand_let2 = $ αφήνει [ int rand @ επιτρέπει ] ? $ rand_let3 = $ αφήνει [ int rand @ επιτρέπει ] ? $ rand_let4 = $ αφήνει [ int rand @ επιτρέπει ] ? $ rand_let5 = $ αφήνει [ int rand @ επιτρέπει ] ? $ rand_let6 = $ αφήνει [ int rand @ επιτρέπει ] ? $ rand_let7 = $ αφήνει [ int rand @ επιτρέπει ] ?
5

Πρόγραμμα η έξοδος . Σε αυτό το πρόγραμμα , η έξοδος είναι τυπωμένο στο κέλυφος των Windows ως άτομο κωδικό πρόσβασης. Ο ακόλουθος κώδικας επιτρέπει το password για να assembled.print " $ rand_let1 " " $ rand_let2 " " $ rand_let3 " " $ rand_let4 " " $ rand_let5 " " $ rand_let6 " " $ rand_let7 \\ n" ? . . . . . . Αποθηκεύστε το αρχείο κώδικα ως « pass_gen.pl . "
Η 6

Εκτελέστε το πρόγραμμα . Στη γραμμή εντολών των Windows, μεταβείτε στον κατάλογο όπου έχει αποθηκευτεί το αρχείο gen_pass.pl . Μόλις στον κατάλογο , πληκτρολογήστε το παρακάτω για να τρέξει το πρόγραμμα . " Perl gen_pass.pl " Θα πρέπει να πάρετε μια τυχαιοποιημένη 7 τον κωδικό πρόσβασης χαρακτήρα ως έξοδο .
Η
εικόνων