home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #16 / NN_1992_16.iso / spool / comp / lang / perl / 5028 < prev    next >
Encoding:
Internet Message Format  |  1992-07-29  |  965 b 
  1. Path: sparky!uunet!darwin.sura.net!jvnc.net!gmd.de!Germany.EU.net!mcsun!sunic!dkuug!uts!id.dth.dk!ej
  2. From: ej@id.dth.dk (Erik Johansen)
  3. Newsgroups: comp.lang.perl
  4. Subject: How do I make 'stty -echo' work from a net service
  5. Message-ID: <1992Jul29.073546.4419@id.dth.dk>
  6. Date: 29 Jul 92 07:35:46 GMT
  7. Organization: Department of Computer Science
  8. Lines: 19
  9.  
  10. In a perl program I need to request a username without
  11. echoing it.  This works fine when I am running it from a shell.
  12.  
  13. I intend to run it from a tcp net service (/etc/services) but
  14. here it will not disable echoing ("Not a tty").
  15.  
  16. I suppose that solving the above problem involves creating a pty
  17. but I do not know how to do it.
  18.  
  19. Any ideas of how to code this ?
  20.  
  21.  
  22. ---
  23.  $txt=" ltrterhnuc--sor eep-\nkJ.a "; srand(53747414);
  24.  for (1..26) { print substr($txt,rand 27,1); }  ### Is this a random write ?
  25. -- 
  26. ---
  27. Erik Johansen                  E-mail: ej@id.dth.dk
  28. Institute for Computer Science, Copenhagen, Denmark
  29.