PDL::Dbg(3) functions to support debugging of PDL scripts


use PDL;
use PDL::Dbg;
$c = $a->slice("5:10,2:30")->px->diagonal(3,4);


These packages implements a couple of functions that should come in handy when debugging your PDL scripts. They make a lot of sense while you're doing rapid prototyping of new PDL code, let's say inside the perldl or pdl2 shell.



Print info about a piddle (or all known piddles)

    pdl> PDL->px
    pdl> $b += $a->clump(2)->px('clumptest')->sumover
    pdl> $a->px('%C (%A) Type: %T') # prints nothing unless $PDL::debug
    pdl> $PDL::debug = 1
    pdl>  $a->px('%C (%A) Type: %T')
    PDL (52433464) Type: Double

This function prints some information about piddles. It can be invoked as a class method (e.g. "PDL->px" ) or as an instance method (e.g. "$pdl->px($arg)"). If

invoked as a class method
it prints info about all piddles found in the current package (excluding "my" variables). This comes in quite handy when you are not quite sure which pdls you have already defined, what data they hold , etc. "px" is supposed to support inheritance and prints info about all symbols for which an "isa($class)" is true. An optional string argument is interpreted as the package name for which to print symbols:

  pdl> PDL->px('PDL::Mypack')

The default package is that of the caller.

invoked as an instance method
it prints info about that particular piddle if $PDL::debug is true and returns the pdl object upon completion. It accepts an optional string argument that is simply prepended to the default info if it doesn't contain a "%" character. If, however, the argument contains a "%" then the string is passed to the "info" method to control the format of the printed information. This can be used to achieve customized output from "px". See the documentation of "PDL::info" for further details.

The output of px will be determined by the default formatting string that is passed to the "info" method (unless you pass a string containing "%" to px when invoking as an instance method, see above). This default string is stored in $PDL::Dbg::Infostr and the default output format can be accordingly changed by setting this variable. If you do this you should also change the default title string that the class method branch prints at the top of the listing to match your new format string. The default title is stored in the variable $PDL::Dbg::Title.

For historical reasons "vars" is an alias for "px".


Alias for "px"


There are probably some. Please report if you find any. Bug reports should be sent to the PDL mailing list [email protected]


Copyright(C) 1997 Christian Soeller ([email protected]). All rights reserved. There is no warranty. You are allowed to redistribute this software / documentation under certain conditions. For details, see the file COPYING in the PDL distribution. If this file is separated from the PDL distribution, the copyright notice should be included in the file.