mercoledì 13 agosto 2008

[Perl] Password

Descrizione
Non visualizza ciò che viene digitato durante l'immissione del valore della variabile $pass.

Codice
use Term::ReadKey;
ReadMode('noecho');
print "Inserire una password: ";
$pass = ReadLine(0);
chomp(
$pass);
print "\nLa password digitata e': $pass\n";
system("pause");

0 commenti: