如何在Perl中获取对象的名称？

Question

假设我按如下方式创建一个对象:

$object22=new somepackage("stuff");

后来我想运行这样一个子程序:

$object22->somesubroutine();

我想捕捉的子程序字符串"object22""somesubroutine." 我试过了:

$self=@_;
print $self;

但那只是给了我 somepackage=HASH(somehexnumber)

请让我知道这是可能的,如果是什么代码是这样做的.

Answer 1

如果没有可怕的hackery(通过堆栈框架查看),这是不可能的.名称只是对象的引用,它不是对象的一部分.

你正以错误的方式解决问题.或许更多描述一下？