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