Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

using Term::ReadLine::Gnu

by my_nihilist (Sexton)
on Mar 19, 2008 at 17:58 UTC ( #675043=perlquestion: print w/replies, xml ) Need Help??
my_nihilist has asked for the wisdom of the Perl Monks concerning the following question:

I am having a hard time understanding the Term::ReadLine::Gnu documentation and there is very little else to be found on-line. Perhaps this error may light a bulb:

function is not of type rl_command_func_tPtr at /usr/lib/perl5/site_perl/5.8.8/i386-linux-thread-multi/Term/ReadLine/Gnu/ line 98.

This was produced with:
#!/usr/bin/perl -w use strict; use Term::ReadLine; # presuming Term::ReadLine::Gnu is present... my $term = new Term::ReadLine 'ReadLine test'; my $prompt = "type: "; $term->bind_key('61', \&insertxt); while (1) { my $input=$term->readline($prompt); } sub insertxt { $term->insert_text("hello!"); }
  • the "key" argument to bind_key (61) must be numeric.
    anyway, there is a whole slew of functions listed in the documentation that obviously presume a knowledge i don't have, because there are no usage examples or explanations, and i have grown tired guessing. I thot anything beginning with "int" is for C...
  • Replies are listed 'Best First'.
    Re: using Term::ReadLine::Gnu
    by almut (Canon) on Mar 19, 2008 at 18:30 UTC

      I think you need to give the function a name first (with add_defun()), and then use that name in the bind_key() call

      ... $term->add_defun('insert-text', \&insertxt); $term->bind_key(61, 'insert-text'); ...
        hey now isn't that handy! Remind me not to bother with too much Term::Readline::Gnu in the future!

        anyway, thanks much almut

    Log In?

    What's my password?
    Create A New User
    Node Status?
    node history
    Node Type: perlquestion [id://675043]
    Approved by planetscape
    [fireblood]: Greetings, I am running perll under cygwin, and have discovered that "require strict" has no effect. Is there a way to get it to work? Thank you.
    [1nickt]: use strict;

    How do I use this? | Other CB clients
    Other Users?
    Others imbibing at the Monastery: (7)
    As of 2017-04-26 02:42 GMT
    Find Nodes?
      Voting Booth?
      I'm a fool:

      Results (467 votes). Check out past polls.