Select Code to Download

use mro          qw( );
use Scalar::Util qw( blessed );
...

   return undef;
}

use B qw( svref_2object );

...

   return svref_2object($method_ref)->GV->STASH->NAME;
}

use B qw( svref_2object );

...

   return svref_2object($method_ref)->FILE;
}