Thanks
for your help. I'll try that..
use
Term::ReadKey;
ReadMode( "noecho", STDIN );
print "\nPlease enter the password for $userid :";
my $password;
$password = <> ;
chomp $password ;
print "\n" ;
ReadMode ("original", STDIN) ;
"Nguon, Vath"
<[EMAIL PROTECTED]>
Sent by: [EMAIL PROTECTED]
05/25/2005 11:24 AM
|
|
Hello,
I am writing a Perl script that prompts for a password from a DOS
command prompt. Since this is a password, each character typed in should be
hidden or replaced with "*" so they won't be clearly visible. Does anyone know
any perl module or how to do this in Perl?
-Vath
_______________________________________________
ActivePerl
mailing list
[email protected]
To unsubscribe:
http://listserv.ActiveState.com/mailman/mysubs
*******************************************************************
This
email and any files transmitted with it are confidential
and intended
solely for the use of the individual or entity
to whom they are addressed.
If you have received this
email in error please notify the sender by
replying to this
email and then delete it from your system.
No
reliance may be placed upon this email without written
confirmation of its
contents and any liability arising from
such reliance without written
confirmation is hereby
excluded.
JRI
America
*******************************************************************
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
