my $config = {};
print "Type your username:  ";
chomp ($config->{username} = <>);

system "stty -echo"
  and croak "Unable to turn off echoing to STDOUT";
print "Type your password:  ";
chomp ($config->{password} = <>);
print "\n";
system "stty echo"
  and croak "Unable to turn echoing to STDOUT back on";