This is a known bug which seems to hit the debugger periodically, and I
think is related to the particular combination of modules installed on a
given system, in particular Term::ReadLine::Gnu.  There is a simple
workaround which involves setting, (if I remember correctly),
PERLDB_RL=1.    You might also try installing Term::ReadLine::Perl, I
think that solves it too.  Basically, I think PERL_RL just has to be
non-zero.  Something like this:

   $> PERL_RL=1 perl -d ...

I realize the answer is a bit vague, but my reference is elsewhere,
among other things ;-)

-- 
Ciao
Richard Foley
Ciao - shorter than aufwiedersehen

http://www.oreilly.com/catalog/perldebugpr/ 

-----Original Message-----
> Date: Mon,  1 Aug 2005 11:32:41 +0200
> Subject: Re: [perl #22758] debugger command "|x" swallows all output 
> From: "Ulrich Windl" <[EMAIL PROTECTED]>
> To: "Michael G Schwern via RT" <[EMAIL PROTECTED]>

> On 12 Jul 2005 at 16:19, Michael G Schwern via RT wrote:
> 
> > > [EMAIL PROTECTED] - Sun Jun 22 23:53:28 2003]: 
> > > -----------------------------------------------------------------
> > > The debugger command "x" works as expected, but "|x" shows no
> > > output at all:
> > > 
> > 
> > I am unable to reproduce this problem.  What pager does the debugger
> > think you're using?  You can find out with this:
> > 
> > $ perl -de 1
> > 
> > Loading DB routines from perl5db.pl version 1.28
> > Editor support available.
> > 
> > Enter h or `h h' for help, or `man perldebug' for more help.
> > 
> > main::(-e:1):   1
> > DB<1> print DB::pager
> > |/usr/bin/less
> > 
> > 
> 
> main::(-e:1):   1
> DB<1> print DB::pager
> |less
> 
> So maybe it's the missting fully qualified name. Shouldn't perl print
> some diagnostics if the pager cannot be found?
> 
> BTW: I tried (not sure which configuration I had reported the
> problem): 
> mailgate:/var/tmp # PATH= /usr/bin/perl -de 1
> 
> Loading DB routines from perl5db.pl version 1.27
> Editor support available.
> 
> Enter h or `h h' for help, or `man perldebug' for more help.
> 
> main::(-e:1):   1
> DB<1> @a=(1 .. 17)
> 
> DB<2> x @a
> 0  1
> 1  2
> 2  3
> 3  4
> 4  5
> 5  6
> 6  7
> 7  8
> 8  9
> 9  10
> 10  11
> 11  12
> 12  13
> 13  14
> 14  15
> 15  16
> 16  17
> DB<3> |x @a
> 
> [1]+  Stopped                 PATH= /usr/bin/perl -de 1
> (Perl seems to hang here)
> 
> Regards,
> Ulrich
> 
> 
> 



Reply via email to