What are your inputs?

What processing do you need to do?

What is your expected output?

What have you tried so far?

Please read How (Not) To Ask A Question and then update your question with enough detail to enable us to help you.

Hi Monks! Thanks for your questions. Please find the answers below. A macro to do what? -I want macro do following activity - To check whether the variable are define before using - Log the value passed to the variable entering/leaving a function i.e. to printing the trail of Input and output variable. - Memory statistic before entering and leaving the function to have idea about the memory status. I don't want that code to be part of the final product. I need those things for development/debugging purpose. What are your inputs? Input is .pl file What processing do you need to do? - To check whether the variable are define before using - Log the value passed to the variable entering/leaving a function i.e. to printing the trail of Input and output variable. - Memory statistic before entering and leaving the function to have idea about the memory status. What is your expected output? Expected output that all the above should be control with #ifdef , so that these things help in debugging but i don't want that to be part of the final product. What have you tried so far? I am trying to learn ExtUtils::PerlPP but i have not comprehand it properly. I hope, I have explained my situation. Please let me know , if you need more input from me. Regards, Mihir

It looks to me like you are trying to do some profiling of your code as it runs in a test environment. Take a look at the Devel modules, you may be able to find a profiler that does what you want.

If you want to inject code into subroutines for testing, you might find Hook::LexWrap useful.

Update: I'd find it a lot easier to read your posts if you added some formatting to your nodes. When you have long lists of things, us an ordered or unordered list. Keep you paragraphs short. Whitespace helps improve readability.


TGI says moo

Take a look at Smart::Comments for debug support with macro-like abilities that disappears completely when disabled.

---

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority".

In the absence of evidence, opinion is indistinguishable from prejudice.

"Too many [] have been sedated by an oppressive environment of political correctness and risk aversion."

It sounds like you want to learn Perl. I'd suggest you go to the O'Reilly web-site and look at their offerrings.

mihirjha,

I'm afraid that I'm still not clear about what it is that you are trying to do. You mention checking whether or not a variable is defined. Well, Perl has an inbuilt function for this, called defined. A very simple example of its usage is as follows:

#!/usr/bin/perl -l
use strict;
use warnings;

my $foo = 1;
my $bar;

print '$foo is ', defined $foo ? "defined" : "not defined";
print '$bar is ', defined $bar ? "defined" : "not defined";
[download]

Which prints:

$foo is defined
$bar is not defined
[download]

You also mention that you want to track the value of a variable. The easiest way to do this is with print, or perhaps something like Data::Dumper.

If, as apl suggests, you are new to Perl and want to learn, then I would suggest that a good place to start would be the Tutorials section of the Monastery.

In any case, welcome to PerlMonks.

Darren :)