logo       

Re: Emacs like line editing during perl input.: msg#00973

emacs.help

Subject: Re: Emacs like line editing during perl input.

Harry Putnam <hgp@xxxxxxxxxxxxx> writes:

> I'd like to have somekind of line editing available during user
> input to a perl script.

Here is an example program using Term::ReadLine that worked for me.

#!/usr/sw/perl/default/bin/perl -w
use Term::ReadLine;
my $t = Term::ReadLine->new('Do nothing');
my $inp = ''; # input from user
print "Type quit to quit.\n";
do {
$inp = $t->readline("> ");
} while ( $inp ne 'quit' );
exit 0;

Don't forget to change the first line. It's really as easy as
calling $x->readline($prompt) to read a line after creating the
Term::ReadLine object $x.

--
Ambibibentists unite!


<Prev in Thread] Current Thread [Next in Thread>
Google Custom Search

News | FAQ | advertise