Exemplo de uso do módulo Term::InKey
Publicado por Sandro Marcell (última atualização em 08/06/2010)
[ Hits: 4.039 ]
Homepage: http://sanmarcell.wordpress.com
Simples exemplo que demonstra o uso do módulo Term::InKey.
Para instalá-lo:
cpan Term::InKey
Uma versão "equivalente" feita em shell script:
http://slackbr.org/forum/viewtopic.php?f=45&t=18792&sid=577d12a41b0e4d4878a64b5bd8188b06
#!/usr/bin/env perl # # Exemplo de uso do modulo 'Term::InKey' # # Mais detalhes: <man perl> e <perldoc Term::InKey> # use strict "vars"; use Term::InKey; my($caracteres, $mascara) = ("", "*"); $| = 'flush'; print("Digite a senha: "); $caracteres = &ReadPassword($mascara); print("A senha digitada foi \'$caracteres\'\n"); flush; exit(0);
Perl OO & Atributos com Class::Accessor
Calculo de valor futuro - regrassão linear
Separando seu código em módulos no Perl
Usando sub/method signatures no Perl
Nenhum comentário foi encontrado.
Enviar mensagem ao usuário trabalhando com as opções do php.ini
Meu Fork do Plugin de Integração do CVS para o KDevelop
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Compartilhamento de Rede com samba em modo Público/Anônimo de forma simples, rápido e fácil
Cups: Mapear/listar todas as impressoras de outro Servidor CUPS de forma rápida e fácil
Criando uma VPC na AWS via CLI
Arch Linux - Guia para Iniciantes (2)
Problemas ao instalar o PHP (11)
Tem como instalar o gerenciador AMD Adrenalin no Ubuntu 24.04? (15)
Tenho dois Link's ( IP VÁLIDOS ), estou tentando fazer o failover... (0)