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 is the code:
use Term::ReadLine;
$term = new Term::ReadLine 'password';
$prompt = "Enter your password: ";
$OUT = $term->OUT || STDOUT;
while ( defined ($_ = $term->readline($prompt)) ) {
$res = eval($_), "\n";
warn $@ if $@;
print $OUT $res, "\n" unless $@;
$term->addhistory($_) if /\S/;
}
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs