my ($method) = shift; print $method::docstring; [download]
In reply to Accessing a scalar value in another subroutine? by Anonymous Monk