use Term::ReadKey; ReadMode('noecho'); # don't echo print "Type your password:"; chomp(my $password = ); ReadMode(0); # back to normal