Re: Debug Perl embedded in irssi

2009-01-23 Thread Rafael Garcia-Suarez
2009/1/23 Richard Foley :
> Perhaps p5p will have an opinion...?
>
> --  Forwarded Message  --
>
> Subject: Debug Perl embedded in irssi
> Date: Tuesday 20 January 2009
> From: Wouter Coekaerts 
> To: debugger@perl.org
>
> Hi,
>
> Irssi is an IRC client using Perl for scripting. I'm trying to attach a
> debugger to its embedded Perl.
>
> I'm using PERLDB_OPTS="RemotePort=127.0.0.1:5000" to let it connect to a
> socket. Running and debugging a perl script started in the "normal" way works
> fine: "perl -d -e 0" connects to the socket and I can control the debugger
> from
> there.
>
> Now I changed irssi so that the arguments it passes to perl_parse and
> PERL_SYS_INIT3 include "-d". Then when starting irssi, it connects to the
> socket, and prints its usual "Loading DB routines"... "Enter h"... But when I
> give any command (including "h") it doesn't respond. The irssi (and its Perl
> scripts) continue to run fine.
>
> Someone an idea of what could be going wrong?

Sorry, I've no idea. Maybe the tty is disconnected. Or perl5db should
try to run via irssi's interface.

But: what would be *cool* would be a debug session in a custom irssi window.

-!- Irssi: join to &perl5db was synced in 0 secs
<@rgs> $x = 39+3;
<@rgs> print $x;
 42


Re: Debug Perl embedded in irssi

2009-01-23 Thread Wouter Coekaerts
On Friday 23 January 2009 14:21:08 Rafael Garcia-Suarez wrote:
> But: what would be *cool* would be a debug session in a custom irssi
> window.
>
> -!- Irssi: join to &perl5db was synced in 0 secs
> <@rgs> $x = 39+3;
> <@rgs> print $x;
>  42

/window new hide
/exec -interactive perl -d -e 0

But that doesn't echo your own commands into the window, so maybe something 
like /exec -interactive tee /dev/stderr | perl -d -e 0, but that doesn't seem 
to want to quit here without a kill.

Anyways, being able to actually debug irssi scripts would be nice...
Is this an irssi-specific problem? Is debugging Perl embedded into another 
program in a way similar as in irssi rather unexplored territory, or is it 
really supposed to work?
Perhaps it's because irssi (glib) controls the main loop and not Perl?

Regards,

Wouter.


Fwd: Debug Perl embedded in irssi

2009-01-23 Thread Richard Foley
Perhaps p5p will have an opinion...?

--  Forwarded Message  --

Subject: Debug Perl embedded in irssi
Date: Tuesday 20 January 2009
From: Wouter Coekaerts 
To: debugger@perl.org

Hi,

Irssi is an IRC client using Perl for scripting. I'm trying to attach a 
debugger to its embedded Perl.

I'm using PERLDB_OPTS="RemotePort=127.0.0.1:5000" to let it connect to a 
socket. Running and debugging a perl script started in the "normal" way works 
fine: "perl -d -e 0" connects to the socket and I can control the debugger 
from 
there.

Now I changed irssi so that the arguments it passes to perl_parse and 
PERL_SYS_INIT3 include "-d". Then when starting irssi, it connects to the 
socket, and prints its usual "Loading DB routines"... "Enter h"... But when I 
give any command (including "h") it doesn't respond. The irssi (and its Perl 
scripts) continue to run fine.

Someone an idea of what could be going wrong?

Thanks.

Wouter.

---

-- 
Richard Foley
Ciao - shorter than aufwiedersehen

http://www.rfi.net/


Debug Perl embedded in irssi

2009-01-20 Thread Wouter Coekaerts
Hi,

Irssi is an IRC client using Perl for scripting. I'm trying to attach a 
debugger to its embedded Perl.

I'm using PERLDB_OPTS="RemotePort=127.0.0.1:5000" to let it connect to a 
socket. Running and debugging a perl script started in the "normal" way works 
fine: "perl -d -e 0" connects to the socket and I can control the debugger from 
there.

Now I changed irssi so that the arguments it passes to perl_parse and 
PERL_SYS_INIT3 include "-d". Then when starting irssi, it connects to the 
socket, and prints its usual "Loading DB routines"... "Enter h"... But when I 
give any command (including "h") it doesn't respond. The irssi (and its Perl 
scripts) continue to run fine.

Someone an idea of what could be going wrong?

Thanks.

Wouter.