Perl 6 / все про class

WHAT

Метод WHAT возвращает название класса, к которому принадлежит объект.

Метод применим как к переменным предопределенных типов, так и к переменным, которые являются экземплярами пользовательских классов.

Например:

class A
{
}
my A $a;
say $a.WHAT;

Вызов $a.WHAT вернет строку A, поскольку переменная $a как раз и является экземпляром этого класса.

Следует иметь в виду, что класс переменной не обязательно остается неизменным на протяжении работы программы. Например:

my $var = 1;
say WHAT $var;
$var = 1.2;
say WHAT $var;
$var = "1.2";
say WHAT $var;

Три обращения к методу WHAT напечатают соответственно Int, Rat и Str.

what, variable, class — 15 апреля 2007