Учитывая объект, как я могу узнать его класс в Perl?

Question

Мне нужна эта информация, чтобы решить, какой из классов с определенным методом вызывается.

Answer 1

ref обычно работает нормально, но blessed в Scalar :: Util может быть лучшим выбором.Он вернет undef для простых ссылок, которые, например, не включены в пакет.

Answer 2

Вы используете встроенную функцию ref для определения ссылочного типа или класса переменной:

my $obj = bless [] => 'Some::Class';

print ref($obj), "\n";  # 'Some::Class';

Более подробную информацию можно найти с Scalar::Util reftype (всегда возвращает тип контейнера) и blessed (всегда возвращает имя класса).

Answer 3

ref($obj) сделает всю работу за вас.