At 09:54 +1030 2001.12.12, htp wrote:
>I have MacPerl 5.6.1b2 installed on MacOS 9.2.1 and have just noticed
>that `stty` no longer seems to be behaving itself. Specifically, echoing
>does NOT seem to get turned off in raw mode. Can anyone else confirm
>this?
>
>--test-case--
>print "Password: ";
>$pass = '';
>`stty -raw`;
>while (($char = getc()) ne "\n")
>{
> if ($char =~ /[\w\b]/) { $pass .= $char; }
>}
>`stty -sane`;
>print "** $pass **\n";
>--end-test-case--
This test case works the same for me in 5.2.0r4 and 5.6.1b2. I think you
really want "raw" and "sane", not "-raw" and "-sane" (or reverse the usage
of "-raw" and "-sane").
However, when I fix it to work that way, it works in 5.2.0r4 and not
5.6.1b2. Not sure what the problem is; could you file a bug report
(http://dev.macperl.org/ has the link)?
>BTW Chris, the web installer worked fine - bewdiful in fact.
Great, thanks for the word.
--
Chris Nandor [EMAIL PROTECTED] http://pudge.net/
Open Source Development Network [EMAIL PROTECTED] http://osdn.com/
