Monroe, John M wrote:

>Hello all, thanks for the help in advance.
>
>I have the readline example from term:readline but I want to suppress the
>typed in text and am not sure.
>  
>
Here's a snippet using Term::ReadKey :

__BEGIN__
#!/usr/bin/perl

use Term::ReadKey;
use warnings;
use strict;

print "Password: ";
ReadMode 2;
my $password = <STDIN>;
chomp($password);
ReadMode 1;
print "\n";
print "Received '", $password, "' as input\n";
__END__

Sample output:

[c:\tmp]readkey.pl
Password: <I typed in 'whatever' here>
Received 'whatever' as input

Notes:

Do a quick lil' "ppm query termreadkey" to see if you have it installed 
or not (it isn't by default).  If you don't have it, a "ppm install 
termreadkey" will take care of that.


Hope this helps,

-rsb


_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to