From mboxrd@z Thu Jan  1 00:00:00 1970
From: Edward Peschko <edwardp@excitehome.net>
To: Keith Seitz <keiths@cygnus.com>
Cc: gdb@sources.redhat.com
Subject: Re: using perl in gdbinit
Date: Wed, 28 Feb 2001 14:21:00 -0000
Message-id: <20010228142124.A28042@excitehome.net>
References: <20010227160952.A25814@excitehome.net> <Pine.SOL.3.91.1010228073240.19631D-100000@ryobi.cygnus.com>
X-SW-Source: 2001-02/msg00434.html

> 
>    init_perl ()
>     {
>         g_interp = Perl_New_Interpreter ();
>     }
> 
> You should be able to do what you want (albeit in a hacky kind of way).

yeah, you could do this... and it might be a lot less hacky than anticipated,
if the perl module Inline could be used.

> For insight, we added a tcl interpreter and bound tcl's command parser to 
> the gdb command "tk". We also have a tcl command, "gdb_cmd", which can be 
> used to execute gdb commands in the tcl interpreter.

I didn't see it inside gdb-5.0... is it integrated with the standard 
distribution or an add on?

> I could do things like what you want above (although I never have):
> (gdb) tk set help [gdb_cmd help]; puts stdout $help
> (gdb) tk set functions [gdb_cmd "info func main"]; puts stdout $functions
> 
> Of course, you are still leaving yourself at the mercy of gdb's human 
> readable output, so you'll need to parse gdb's output to do some things 
> well.

hmm. that's what made me think of perl in the first place... one question 
though, how does the tk interface deal with the 'more'-like behaviour of gdb 
(ie: returns at the end of every page, etc.)

Ed