Read password using Perl on Windows without using CPAN packages

Question

We have a Perl script that uses the terminal to read a password. This script does not work on Windows as the terminal is not available.

We did some research and found that ReadKey/Readline is an alternative for this. However, this package is not part of our default Perl install.

Is there a way to read a password in Perl without using the terminal or ReadKey/Readline?

Which Perl distribution are you using on Windows? Is is ActivePerl or Strawberry Perl? — mvp, Mar 10 '13 at 07:16

score 2 · Answer 1 · answered Mar 10 '13 at 08:03

If you are looking for a way of getting the password without echoing in the terminal, try this:

use Term::ReadKey;
print "Enter password:";
ReadMode('noecho'); 
my $password = <STDIN>;
chomp($password);

Later, if you have to back to normal terminal input echo, write this:

ReadMode(0);

This solution requires the installation of Term::ReadKey, and it works it Windows also.

score 1 · Answer 2 · edited May 23 '17 at 12:06

1

Instructions on installing CPAN modules with ActivePerl may be found here:

Instructions on installing CPAN modules with Strawberry Perl may be found here:

edited May 23 '17 at 12:06

Community

answered Mar 10 '13 at 09:39

Mauritz Hansen

2 Answers2