[Cedarvalley] Perl Impossibility?

[Stephen D. Wells]

Have a problem that has been drudged up from the last century....

http://groups.google.com/groups?q=readline+socket+group:comp.lang.perl.modules&hl=en&lr=&ie=UTF-8&oe=UTF-8&group=comp.lang.perl.modules&c2coff=1&safe=off&selm=3706E49B.5AD0C8A%40cedarnet.org&rnum=3 
Unfortunately the code as posted doesn't exactly compile under 'use
strict' you need to  add: 

my $server_port = 6666;

above the my $password line.

Copy the code to a file and run it... in another window try:

telnet 0 6666

and enter a password... 

The noecho feature doesn't seem to kick in -- the client can still see
the password.  I can't believe that this is impossible to write in
perl... Anyone have a suggestion?

TIA,
STEVE
-- 
Stephen D. Wells <wells at cedarnet.org>