print "Password: ";

system('stty','-echo');
my $pw=<STDIN>;
system('stty','echo');

chomp($pw);