perl 回调必须是函数引用

最新推荐文章于 2024-07-19 23:41:15 发布

scan724

最新推荐文章于 2024-07-19 23:41:15 发布

阅读量655

点赞数

CC 4.0 BY-SA版权

分类专栏： perl LWP 经典大骆驼回顾

本文链接：https://blog.youkuaiyun.com/zhaoyangjian724/article/details/51906787

perl LWP 同时被 2 个专栏收录

111 篇文章 ¥39.90 ¥99.00

订阅专栏

经典大骆驼回顾

31 篇文章 ¥39.90 ¥99.00

订阅专栏

本文通过示例展示了在Perl中使用AnyEvent库创建定时器时，回调函数必须是函数引用，否则将导致错误。当将函数引用传递给cb参数时，程序能够正常运行并每秒打印'test'。如果直接传递函数调用，程序会抛出错误提示："callback must be a CODE reference or another callable object"。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

[root@wx03 lib]# cat a1.pl 
use AE;
use AnyEvent;
##定义watch
my $t = AnyEvent->timer(
        after    => 0,
        interval => 5,
        cb       => sub {print test."\n";}
    );
    ##不要再每秒打印时间
    ##undef $t;
    my $cv = AnyEvent->condvar;
    $cv->recv;
[root@wx03 lib]# perl a1.pl 
test
test


[root@wx03 lib]# cat a1.pl 
use AE;
use AnyEvent;
##定义watch
my $t = AnyEvent->timer(
        after    => 0,
        interval => 5,
        cb       =>  print test."\n"
    );
    ##不要再每秒打印时间
    ##undef $t;
    my $cv = AnyEvent->condvar;
    $cv->recv;
[root@wx03 lib]# perl a1.pl 
test
1: callback must be a CODE reference or another callable object at /usr/local/perl/lib/site_perl/5.22.1/x86_64-linux/AnyEvent/Impl/EV.pm line 50.

回调必须是一个函数引用或者而另外的回调对象