README for Devel::Caller 0.10 =head1 NAME Devel::Caller - meatier versions of C =head1 SYNOPSIS use Devel::Caller qw(caller_cv); $foo = sub { print "huzzah\n" if $foo == caller_cv(0) }; $foo->(); # prints huzzah use Devel::Caller qw(called_with); sub foo { print called_with(0,1); } foo( my @foo ); # should print '@foo' =head1 DEPENDENCIES This module has external dependencies on the following modules: PadWalker 0.08 =head1 INSTALLATION perl Build.PL perl Build test and if all goes well perl Build install =head1 HISTORY What changed over the last 3 revisions =over =item 0.10 Wednesday 5th July, 2006 Use strlen rather than playing with SvLEN/SvCUR to determine the length of identifiers in the pad. It's a theoretical segfault waiting to happen, but one that isn't tickled by the current test suite. Fixes failures under perl 5.8.8 as reported by clkao. =item 0.09 Sunday 5th October, 2003 Split Changes out from HISTORY pod section. Port to Module::Build We can now determine constant values in called_with. Partial fixes for http://rt.cpan.org/NoAuth/Bug.html?id=2878 =item 0.08 2003-03-28 Added caller_vars as a synonym for called_with Added caller_args =back =head1 SEE ALSO L, L, L =head1 AUTHOR Richard Clamp with close reference to PadWalker by Robin Houston =head1 COPYRIGHT Copyright (c) 2002, 2003, 2006 Richard Clamp. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.