将类子例程作为回调传递

Question

我正在使用一个采用回调的模块(AnyEvent :: Socket).我试图传递一个类子程序作为回调,但没有任何工作示例:

tcp_server undef, $self->port,\$self->handle_connection

它只是不起作用,它抱怨未定义的变量.如果我将该函数作为匿名子例程传递它是有效的

Answer 1

你可以传递一个调用object方法的匿名函数,

sub{ $self->handle_connection }