Еще один хэш функций ref внутри модуля Perl

Question

У меня есть объект perl, который содержит хэш хэшей coderefs (методов).

Следующий код работает для вызова метода:

my $c2 = $self->{Formatter}->{"ENOTE:Final"}($self, $e);

Мне кажется странным, что я должен называть это так.Есть ли другой, лучший синтаксис для этого?Я не буду утомлять вас тем, что не будет работать.

Спасибо.

-E

Answer 1

Если вы ищете более объектно-ориентированный синтаксис, есть

my $method = $self->{Formatter}{"ENOTE:Final"};
my $c2 = $self->$method($e);