Help for this page
use Term::ReadKey; sub masked_read(;\$$) { ... print "Enter:"; my $password = masked_read; print "\npassword:$password";
masked_read($password, $mask); masked_read($password, '#'); masked_read($password); my $password = masked_read();