If anyone there can
give me some pointers to how to access the syntax tree for an executing Perl
program, _from within that program_, I would be very grateful. I suspect
this may not be possible. The O::Backend system seems to require the Perl
program execute with overloaded Ops (example : Terse) and so the "normal"
execution of the code is forfeited.
I have fiddled
with Devel::OpProf to get at what internal opcodes have executed, but really
want to have my perl program somehow obtain the same large text dump created by
a -MO=Terse printing, as part of my program's execution. I don't want to
call Terse over the source .pl file either... sorry!
#!/usr/bin/perl
my
$terse_dump_of_this = foo_magic_B::something;
#code code code
code
Kind regards,
Craig.
**********************************************************************
This email is intended only for the use of the individual or entity
named above and may contain information that is confidential and
privileged. If you are not the intended recipient, you are hereby
notified that any dissemination, distribution or copying of this
Email is strictly prohibited. When addressed to our clients, any
opinions or advice contained in this Email are subject to the
terms and conditions expressed in the governing KPMG client
engagement letter. If you have received this Email in error, please
notify us immediately by return email or telephone +61 2 93357000
and destroy the original message. Thank You.
**********************************************************************M