At 01:31 PM 6/11/02 -0700, learn perl wrote:
>Hi guys, I am writing a script where a user is prompted for password.
>However, I do not wish to have the program display his/her password. Is
>there a way to do this?
Yes, you type "perldoc -q password". Here's what happens:
$ perldoc -q password
Found in /usr/lib/perl5/5.6.1/pod/perlfaq8.pod
How do I ask the user for a password?
(This question has nothing to do with the web. See a
different FAQ for that.)
There's an example of this in the crypt entry in the
perlfunc manpage). First, you put the terminal into "no
echo" mode, then just read the password normally. You may
do this with an old-style ioctl() function, POSIX terminal
control (see the POSIX manpage or its documentation the
Camel Book), or a call to the stty program, with varying
degrees of portability.
You can also do this for most systems using the
Term::ReadKey module from CPAN, which is easier to use and
in theory more portable.
use Term::ReadKey;
ReadMode('noecho');
$password = ReadLine(0);
--
Peter Scott
Pacific Systems Design Technologies
http://www.perldebugged.com/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
