在计算机程序设计中,回调函数,或简称回调(Callback),是指通过函数参数传递到其它代码的,某一块可执行代码的引用.这一设计允许了底层代码调用在高层定义的子程序. 没啥不好理解的呀,就是向函数的参数为 一个函数的引用呀.. [root@wx03 ~]# cat a2.pl use AE; use AnyEvent; ##定义watch sub run { my $code=shift; my $t = AnyEvent->timer( after => 0, interval =>…
perl中的引用和C中的指针一样,用"\"标识,引用后可使用符号"->"取值.解引用则在对应的数据类型前加$,@ 或%. 这里这里用两数组求和做示例,引用传递的子函数的用法. 1 use strict; 2 3 my @s1=(1,13,4,25,6,27,8,22); 4 my @s2=(11,2,34,5,6,23,1,54); 5 6 my @sum=sums(\@s1,\@s2); 7 8 foreach my $k(@sum){ 9 print &q…