Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 

Credenciales con asteriscos

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Básico
Mensaje Jue May 08, 2008 7:41 am
Reina
Perlero Nuevo
Perlero Nuevo
Registrado: 25 Abr 2008
Mensajes: 18
Credenciales con asteriscos Responder citando

Buenas,

¿Alguien sabe cómo hacer para que cuando un script te pida tu contraseña se muestren asteriscos en vez de ésta?

¡¡Gracias!!
Mensaje Jue May 08, 2008 7:55 am
kidd
Creador de Perl en Español
Creador de Perl en Español
Registrado: 15 Oct 2003
Mensajes: 1371
Ubicación: México
Responder citando

¿Te refieres a en la línea de comandos o en HTML?
Mensaje Jue May 08, 2008 7:59 am
Reina
Perlero Nuevo
Perlero Nuevo
Registrado: 25 Abr 2008
Mensajes: 18
Responder citando

En línea de comando.
Mensaje Jue May 08, 2008 8:30 am
kidd
Creador de Perl en Español
Creador de Perl en Español
Registrado: 15 Oct 2003
Mensajes: 1371
Ubicación: México
Responder citando

Puedes usar el módulo Term::ReadPassword

Saludos
Mensaje Vie May 09, 2008 3:15 am
Reina
Perlero Nuevo
Perlero Nuevo
Registrado: 25 Abr 2008
Mensajes: 18
Responder citando

Buenas, he estado probando con un pequeño script antes de meterle mano al original, pero lo que me propusisteis no es exactamente lo que tenía en mente.

El script que he realizado es el siguiente:

Perl:
use Term::ReadPassword::Win32;

print "Escribe el nombre de usuario:";
$remote_user = <STDIN>;
chomp $remote_user;
$password = read_password('password: ');


Lo que me sucede es que a la hora de escribir la contraseña, no muestra absolutamente nada por pantalla, y mi idea era que me mostrara un asterisco por letra de la password, así cuando te equivoques, por ejemplo, puedes ver cuántas letras estás borrando.

He estado buscando pero no encuentro nada... Confused

¿Es posible hacer lo que quiero?

Gracias.
Mensaje Vie May 09, 2008 7:40 am
kidd
Creador de Perl en Español
Creador de Perl en Español
Registrado: 15 Oct 2003
Mensajes: 1371
Ubicación: México
Responder citando

Hola,

Intenta con el siguiente código que puedes encontrar en perlmonks.org:
http://www.perlmonks.org/?node_id=263150

Saludos
Mensaje Vie May 09, 2008 2:06 pm
creating021
Vive para Perl en Español
Vive para Perl en Español
Registrado: 23 Feb 2006
Mensajes: 474
Ubicación: Frente al monitor
Responder citando

Sólo tienes que poner $Term::ReadPassword::USE_STARS = 1;

Si lo quieres hacer todo (usando módulos del core) te recomiendo leer esto:
http://perlenespanol.baboonsoftware.com/foro/viewtopic.php?t=2271
http://perlenespanol.baboonsoftware.com/foro/viewtopic.php?t=1441
Publicar nuevo tema   Responder al tema    Foros de discusión -> Básico Todas las horas son GMT - 6 Horas
Página 1 de 1



Powered by phpBB © 2001, 2005 phpBB Group