How can I get a call stack listing in Perl?

Question

Is there a way I can access (for printout) a list of sub + module to arbitrary depth of sub-calls preceding a current position in a Perl script?

I need to make chan

Answer 1

One that is more pretty: Devel::PrettyTrace

use Devel::PrettyTrace;
bt;