Desenvolvimento de senhas para um grande número de usuários é uma tarefa menos difícil, se um gerador de senha aleatória é utilizado. As senhas podem incluir caracteres alfanuméricos , bem como símbolos, e ser tão longos como os desejos de desenvolvedores. Senhas aleatoriamente gerados são normalmente emitidos como um padrão para novos usuários de um aplicativo. Um script Perl que gera 7 senhas caráter construído de símbolos aleatórios , números e letras podem ser usados para gerar senhas aleatórias . Coisas que você precisa 
 editor PerlText , por exemplo, Emacs , Contexto , Notepad 
 Show Mais instruções 
 1 
 Digite o " she- bang" linha. Esta é uma linha de código Perl que permite que o intérprete sabe que o que está sendo chamado é um script Perl. Esta linha de código vai no topo do script. # /Usr /bin /perl 
 2 
 Atribuir valores de matriz de caracteres. Para fazer isso, você precisará de quatro matrizes diferentes para os quatro tipos de caracteres na senha . As matrizes abaixo são definidas para os números de 1 a 9 , vários símbolos de caracteres , letras minúsculas e maiúsculas @ num = ( 1 .. 9); . @ Caractere = ( '@' , '#' , '$ ', ' % ', ' ^ ' , ' e ' ,' * ' ,' \\ (',' \\) '); @ alph = (' a ' .. ' z ' ); @ alph_up = (' A '..' Z '); 
 3 
 Definir a matriz de atribuição aleatória . Esta matriz combina os elementos das matrizes de caracteres. Deve haver sete deles para que alguns tipos de caracteres irá ocorrer com mais freqüência do que outros. . A decisão de que tipos de caracteres extras para incluir é feita pelo desenvolvedor @ permite = ( @ alph , @ alph_up , @ num, @ num, @ char, @ alph , @ num1 ); 
 4 
 Atribuir variáveis de senha . Neste trecho de código , cada caractere da senha é atribuído um valor aleatório por meio do comando "int rand ", que randomizes os itens em cada array $ rand_let1 = $ permite [ int rand @ permite ]; . $ Rand_let2 = $ permite [ int rand @ permite ]; $ rand_let3 = $ permite [ int rand @ permite ]; $ rand_let4 = $ permite [ int rand @ permite ]; $ rand_let5 = $ permite [ int rand @ permite ]; $ rand_let6 = $ permite [ rand int @ permite ]; $ rand_let7 = $ permite [ int rand @ permite ]; 
 5 
 Programa a saída . Neste programa , a saída é impresso para o shell do Windows como uma senha individual. O código a seguir permite que a senha a ser assembled.print "$ rand_let1 " "$ rand_let2 " "$ rand_let3 " "$ rand_let4 " "$ rand_let5 " "$ rand_let6 " "$ rand_let7 \\ n"; . . . . . . Salve o código como " pass_gen.pl ". 
 6 
 Execute o programa. No prompt de comando do Windows, vá para o diretório onde o arquivo será salvo gen_pass.pl . Uma vez no diretório, digite o seguinte para executar o programa. " Perl gen_pass.pl " Você deve obter uma senha de sete caracteres randomizado como saída.