Get a function argument's name

slaniel has asked for the wisdom of the Perl Monks concerning the following question:

I've got a function that takes a function argument, and I'd like to be able to extract the name of the function argument. Something like this must be possible, because caller() can extract function names from the call stack. Now I just want to extract the name of a function argument.

Comment on Get a function argument's name Download Code

Replies are listed 'Best First'.
Re: Get a function argument's name by Roy Johnson (Monsignor) on Jul 05, 2006 at 17:53 UTC
See Re: How to de-reference a coderef? (B tricks). Caution: Contents may have been coded under pressure.	[reply]
Re^2: Get a function argument's name by slaniel (Acolyte) on Jul 05, 2006 at 18:38 UTC
That did the trick! Thanks a bunch.	[reply]
Re: Get a function argument's name by graff (Chancellor) on Jul 05, 2006 at 17:34 UTC
It might help if you post a snippet of (pseudo) code that shows what you are trying to accomplish. If the code you post actually fails to do what you want, it will be easier for us to see what it does, and maybe then we can figure out how to make adjustments so that it will do what you want.	[reply]
Re^2: Get a function argument's name by slaniel (Acolyte) on Jul 05, 2006 at 17:51 UTC
Sure. I'm writing a little function to run another function on a given set of arguments and time how long it takes. Looks like so: `sub run_and_time(&@) { use Time::HiRes; my $func = shift; my $funcName = [some bit of code to get $func's name] my $start_time = [gettimeofday]; my @retlist = &{$func}(@_); print "Time to run $funcName: ", tv_interval($start_time), "\n"; }` [download] So I need some way to get `$funcName`. Does that clarify things?	[reply] [d/l] [select]
Re^3: Get a function argument's name by BUU (Prior) on Jul 06, 2006 at 15:32 UTC
Er, is there something wrong with Benchmark? Specifically: "timethis - run a chunk of code several times". Or maybe "timethese - run several chunks of code several times".	[reply]


good chemistry is complicated, and a little bit messy -LW
	PerlMonks