print "Enter Password: ";
my $password = <STDIN>;