perl - ユーザーコード内から perldb の x コマンドを使用するには?

Question

perl デバッガーのxコマンドに相当するプログラムは何ですか?

IOW、そのxような機能は何ですか

print x( $myvar );

Perl スクリプトでは、

DB<2> x $myvar

perlデバッガーで？

(注: 私は を認識してData::Dumperいますが、それは私が探しているものではありません; IOW、私は明示的にそれを除外しています;D::Dのフォーマットはデバッガーによって生成されたものとは異なりx、私は後者を好みます。)

Answer 1

でルーチンを探していると思いますが、ファイルdumpvar.plと同じディレクトリにありperl5db.plます (参照perldoc -l perl5db.pl)。

例：

require "dumpvar.pl";
dumpValue( { foo => 123, bar => "qwerty" } );

プロデュース:

'bar' => 'qwerty'
'foo' => 123