perl - 通过变量引用一个类，perl

Question

我正在编写一个带有插件模块的 IRC 机器人。有一个存储命令定义的 SQLite 数据库。

我将有一个模块 Bot::Plugins::Modes，它会有像 kick 和 voice 这样的方法。我像这样实例化 Modes:

$modes = new Bot::Plugins::Modes

我可以这样调用一个方法:

$modes->voice(arg1 arg2);

在我的数据库中，我有字段 module 和 method。对于此示例，模块和方法分别是 modes 和 voice。

监听机器人命令的监听器执行它们。我正在尝试做类似...

&{"$module->$method"}(arg1, arg2)

但我无法弄清楚语法。在它们可以通过模块加载并且只是我可以做的潜艇之前:

&{$command}(arg1, arg2)

其中 $command 是数据库中的方法字段。在这种情况下，它只是“语音”，voice 是一个子例程。

Answer 1

类名和方法名都可以是标量。其余语法正常。

my $module = "Foo";
my $method = "bar";

# Same as Foo->bar($arg1, $arg2);
$module->$method($arg1, $arg2);