PDL::Perldl2::Plugin::PrintControl - disable default print output
pdl> $x = 3; 3 pdl> $_REPL->load_plugin('PDL::Perldl2::Plugin::PrintControl'); pdl> $x; pdl> $_REPL->print_by_default(1); 1 pdl> $x; 3
By default the Devel::REPL always prints the results of its evaluation. This is fine for small objects but for things like large data objects (e.g. a 100x100 matrix in PDL) the result can be hundreds of lines of output for each command.
This plugin disables the default print output and adds an attribute with accessor method
print_by_default which can be used to toggle the print default on or off.
By default, the
PrintControl plugin sets
print_by_default to 0 (false), which disables automatic printing of results. Call the print_by_default accessor with a 1 (true value) to enable default printing.
This is a convenience accessor for the print_by_default attribute. If you call this method without a value, it toggles the current setting. Otherwise, it just sets print_by_default to the value.
It is also available in the
pdl2 shell as the do_print sub with the same operation but with an implicit use of
<chm at cpan dot org>
Copyright (C) 2010 by Christopher Marshall
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.