7 lines
102 B
Perl
7 lines
102 B
Perl
|
use Term::ReadKey;
|
||
|
|
|
||
|
|
print "Type your password: ";
|
||
|
|
|
||
|
|
ReadMode('noecho');
|
||
|
|
|
||
|
|
$password = ReadLine(0);
|