Debug package

Do you have a question? Post it now! No Registration Necessary.  Now with pictures!

Hi all,

I was wondering if ther's a Devel::Package that could produce, given a
script something of this type:

  |------ sub2
  |         |----- sub3
  |         |----- sub3
  |------- sub5

I want only the subs called during a script run.

To solve this problem I tryed to write my own debug package...
but it's new for me.

I wrote this:

package DB;
use strict;
use warnings;
use 5.010;
use DB;
sub sub {
    say "Enterig SUB: ". $DB::sub;
    say "Enterig subname: ". $DB::subname;

but I'm not able to get the subs name from:
as described from

Could anyone give me any advice?

Site Timeline