debugin perl under debian not working

[T.Pospisek's MailLists]

The subject says it: I can not debug perl with neither ddd 3.2.1 nor with
ddd 3.3. I've got perl5.6 runing and the distribution is debian-testing.
Ddd 3.2.1 can debug perl5.6 though on the machine in front of me, that
runs SuSE 7.1.

There's another bugreport on the Debian site ducumenting the exaclty same
problem
(http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=65010&repeatmerged=yes):

When invoking ddd on a perl script (eg. "ddd /usr/bin/dpkg-repack"),
the ddd console freezes after displaying the following:

=====
GNU DDD 3.2.1 (i686-pc-linux-gnu), by Dorothea Lütkehaus and Andreas
Zeller.
Copyright © 1995-1999 Technische Universität Braunschweig, Germany.
Copyright © 1999-2000 Universität Passau, Germany.

Loading DB routines from perl5db.pl version 1.0402
Emacs support available.

Enter h or `h h' for help.

^A^B  DB<1> ^A^B
=====

Only when quitting ddd is the source window transciently displayed,
but that's not much usefull...

Using explicit "-debugger /usr/bin/perl" does not change anything.

Is this a know problem? Does anybody know why this happens or how it can
be resolved? I'd be glad to help if I can since I do not know of any
usable GUI debugger and I've got some tricky perl code to debug...

perldebug itself works:

$ perl -d dpkg-shlibdeps.pl
_________ /usr/local/lib/perl/5.6.0 /usr/local/share/perl/5.6.0
/usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.6.0 /usr/share/perl/5.6.0
/usr/lib/perl5/5.6/i386-linux /usr/lib/perl5/5.6
/usr/lib/perl5/5.005/i386-linux .
Default die handler restored.

Loading DB routines from perl5db.pl version 1.07
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(dpkg-shlibdeps.pl:6):    $dpkglibdir="/usr/lib/dpkg";
  DB<1>

*t

----------------------------------------------------------------------------
             Tomas Pospisek
             SourcePole   -  Linux & Open Source Solutions
             http://sourcepole.ch
             Elestastrasse 18, 7310 Bad Ragaz, Switzerland
             Tel: +41 (81) 330 77 11
----------------------------------------------------------------------------