home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / comp / lang / perl / 8025 < prev    next >
Encoding:
Text File  |  1993-01-28  |  2.1 KB  |  58 lines
  1. Newsgroups: comp.lang.perl
  2. Path: sparky!uunet!ferkel.ucsb.edu!taco!gatech!paladin.american.edu!howland.reston.ans.net!spool.mu.edu!agate!netsys!pagesat!spssig.spss.com!news.oc.com!convex!benavide
  3. From: benavide@convex.com (John Benavides)
  4. Subject: Re: Editline in perl
  5. Sender: usenet@news.eng.convex.com (news access account)
  6. Message-ID: <benavide.728153783@neptune>
  7. Date: Wed, 27 Jan 1993 16:56:23 GMT
  8. References: <1993Jan26.222254.19183@uvaarpa.Virginia.EDU>
  9. Nntp-Posting-Host: neptune.convex.com
  10. Organization: Engineering, CONVEX Computer Corp., Richardson, Tx., USA
  11. X-Disclaimer: This message was written by a user at CONVEX Computer
  12.               Corp. The opinions expressed are those of the user and
  13.               not necessarily those of CONVEX.
  14. Lines: 42
  15.  
  16. ripper@athena.mit.edu writes:
  17.  
  18.  
  19. >I'm trying to generate a prompt which would allow users many
  20. >of the spiffy lineeditting characteristics that tcsh has (^A to
  21. >goto beginning of line, ^K to kill the rest of the line, ^E to
  22. >get to the end of the line, arrow keys, etc).  Is there a script 
  23. >out there already that does that?  Is there also a better 
  24. >documented version of 'termcap.pl' (which has more than a header
  25. >of 4 short usage examples)?
  26.  
  27. >-Ross Lippert
  28. >ripper@athena.mit.edu
  29.  
  30. Ross, 
  31.     check out the "complete.pl" source described on page 395 of
  32. the Camel book (_Programming Perl_ by L. Wall and R. Schwartz).
  33.  
  34. I just used it.  I had to reset one of its variables
  35. using "undef($Complete'return);" after each call in my application
  36. because the previous "$input" was still part of the prompt on
  37. succeeding calls.
  38.  
  39.   |% perl -v
  40.   |
  41.   |This is perl, version 4.0
  42.   |
  43.   |$RCSfile: perl.c,v $$Revision: 4.0.1.7 $$Date: 92/06/08 14:50:39 $
  44.   |Patch level: 34
  45.   |
  46.   |Copyright (c) 1989, 1990, 1991, Larry Wall
  47.   |
  48.   |Perl may be copied only under the terms of either the Artistic License or the
  49.   |GNU General Public License, which may be found in the Perl 4.0 source kit.
  50.   |%
  51.  
  52. -John Benavides
  53.  benavide@convex.com
  54. --
  55. Regards,
  56.    John Benavides    |Junior Member,
  57.    benavide@convex.com    |Understanding tchrist from his sigs Assoc. (TM)
  58.