Chris, (others),
I am using pdl2, the new command line replacement for perldl. I am not
sure what I am gaining, but I do know that I don't like its error
reporting. It spews out loads of error messages, none of which are
really helpful to me as a user. Here is an example
PDL> p 4c
Bareword found where operator expected at (eval 528) line 5, near "4c"
(Missing operator before c?)
Compile error: syntax error at (eval 528) line 7, near "4c
"
BEGIN not safe after errors--compilation aborted at (eval 528) line 7.
at (eval 528) line 7
eval 'package main;
sub {
BEGIN { if ( $_REPL->_has_hints ) { ( $^H, %^H ) = @{ $_REPL->_hints }
} }{ no warnings \'void\'; \'\'; }
BEGIN { $Devel::REPL::Plugin::Commands::COMMAND_INSTALLER->(__PACKAGE__) }
p 4c
; BEGIN { $Devel::REPL::Plugin::Packages::PKG_SAVE = __PACKAGE__; };
BEGIN { $_REPL->_hints([ $^H, %^H ]) }
}
;' called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL.pm line 117
Devel::REPL::compile('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c\x{a}') called at
/usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL/Plugin/Commands.pm
line 62
Class::MOP::Class:::around('CODE(0x100b04b90)',
'Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)', 'p
4c\x{a}') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 159
Class::MOP::Method::Wrapped::__ANON__('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c\x{a}') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 89
Class::MOP::Class::__ANON__::SERIAL::2::compile('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c\x{a}') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/PDL/Perldl2/Plugin/NiceSlice.pm
line 24
Class::MOP::Class:::around('CODE(0x100c32f50)',
'Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)', 'p 4c')
called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 159
Class::MOP::Method::Wrapped::__ANON__('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 89
Class::MOP::Class::__ANON__::SERIAL::13::compile('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c') called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL.pm
line 110
Devel::REPL::eval('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c') called at
/usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL/Plugin/Packages.pm
line 45
Class::MOP::Class:::around('CODE(0x100b049b0)',
'Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)', 'p 4c')
called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 159
Class::MOP::Method::Wrapped::__ANON__('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 89
Class::MOP::Class::__ANON__::SERIAL::1::eval('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c') called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL.pm
line 72
Devel::REPL::formatted_eval('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)',
'p 4c') called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL.pm
line 62
Devel::REPL::run_once('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL/Plugin/Interrupt.pm
line 25
Class::MOP::Class:::around('CODE(0x100b02d40)',
'Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 159
Class::MOP::Method::Wrapped::__ANON__('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 89
Class::MOP::Class::__ANON__::SERIAL::17::run_once('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL.pm line 45
eval {...} called at
/usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL.pm line 45
Devel::REPL::run_once_safely('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL.pm line 38
Devel::REPL::run('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at
/usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL/Plugin/ReadLineHistory.pm
line 50
Class::MOP::Class:::around('CODE(0x100b03568)',
'Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 159
Class::MOP::Method::Wrapped::__ANON__('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 89
Class::MOP::Class::__ANON__::SERIAL::15::run('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL/Plugin/Interrupt.pm
line 12
Class::MOP::Class:::around('CODE(0x100fd9c50)',
'Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)') called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 159
Class::MOP::Method::Wrapped::__ANON__('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at
/usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/Class/MOP/Method/Wrapped.pm
line 89
Class::MOP::Class::__ANON__::SERIAL::17::run('Class::MOP::Class::__ANON__::SERIAL::17=HASH(0x100ac7638)')
called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL/Script.pm
line 82
Devel::REPL::Script::run('PDL::Perldl2::Script=HASH(0x100bcb358)')
called at /usr/local/lib/perl5/site_perl/5.12.1/Devel/REPL/Script.pm
line 88
Devel::REPL::Script::import('PDL::Perldl2::Script', 'run') called at
/usr/local/bin/pdl2 line 20
main::BEGIN() called at (eval 528) line 7
eval {...} called at (eval 528) line 7
Any suggestions on how I can suppress these messages? Or, at least,
most of them?
--
Puneet Kishor
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
