Perl对象层次结构内省

假设我有以下包层次结构：

A--> B --> C --> D

这意味着A是基类，B从中继承，C从B继承，依此类推

另外，假设我有以下代码行：

my $co = D->new();

有什么方法可以检查一些通用的方法吗？如果对象co是a的后代？或者一般来说，要测试对象X是否是包P的后代，请参见

或

看

或

---

我相信你可以用它

$co->isa($package_name);

它是所有perl引用都具有的通用方法。

---

我相信你可以用

$co->isa($package_name);

它是所有perl引用都具有的通用方法。

+1用于提及罐头。使用isa通常意味着你做错了什么事。使用isa通常意味着你做错了什么。

$co->isa($package_name);