13.9 サブクラスのインスタンスを判定する

Perl Cookbook

あるオブジェクトが特定のクラスまたはそのサブクラスのインスタンスであるかどうかを判定する。

  • UNIVERSALと言う特別なクラスに含まれているメソッドを次のような方法で使用する。
$obj->isa("HTTP::Message");   # オブジェクトメソッドとして
HTTP::Response->isa("HTTP::Message");   # クラスメソッドとして

if ($obj->can("method_name")) { .... }   # メソッドの有効性を検査する。