免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2839 | 回复: 5

函数据传递参数接收的区别 [复制链接]

论坛徽章:
0
发表于 2011-03-24 16:07 |显示全部楼层
各位perl高手,请教一个问题。
  1. sub get_slave_info {
  2.          my ($dbh) = @_;
  3.         my $sql = "show slave status";
  4.         my $r;
  5.         eval{
  6.                 local $SIG{ALRM} = sub { die 'TIMEOUT' };
  7.                 alarm(30);
  8.                 $r = $dbh->selectall_hashref($sql, 1);
  9.                 alarm(0);
  10.         };
  11.         return ( values( %{$r} ))[0];
  12. }
复制代码
这个函数的返回,传递给另外两个函数如下:
1
  1. sub check_repl_1 {
  2.     my ($repl_status) = @_;
  3.         print Dumper($repl_status);
  4. }
复制代码
2
  1. sub check_repl_2 {
  2.         my $repl_status = @_;
  3.         print Dumper($repl_status);
  4. }
复制代码
确得不一样的结果? 请各位大侠指导一下为什么?

论坛徽章:
0
发表于 2011-03-24 16:10 |显示全部楼层
调用方法如下:
check_repl_1(get_slave_info(\$dbh));
check_repl_2(get_slave_info(\$dbh));

论坛徽章:
46
15-16赛季CBA联赛之四川
日期:2018-03-27 11:59:132015年亚洲杯之沙特阿拉伯
日期:2015-04-11 17:31:45天蝎座
日期:2015-03-25 16:56:49双鱼座
日期:2015-03-25 16:56:30摩羯座
日期:2015-03-25 16:56:09巳蛇
日期:2015-03-25 16:55:30卯兔
日期:2015-03-25 16:54:29子鼠
日期:2015-03-25 16:53:59申猴
日期:2015-03-25 16:53:29寅虎
日期:2015-03-25 16:52:29羊年新春福章
日期:2015-03-25 16:51:212015亚冠之布里斯班狮吼
日期:2015-07-13 10:44:56
发表于 2011-03-24 16:16 |显示全部楼层
my ($repl_status) = @_;
my $repl_status = @_;
两个调用函数这里不同,my 不加括号是 scalar context。

论坛徽章:
0
发表于 2011-03-24 16:25 |显示全部楼层
my ($repl_status) = @_;
my $repl_status = @_;
两个调用函数这里不同,my 不加括号是 scalar context。
zhlong8 发表于 2011-03-24 16:16


是不是可以这样理解,当没括号是 会把@_的长度 赋给了 $repl_status. 当加了括号,就相当于shift(@_)给了$repl_status;

测了一下my $repl_status = shift(@_) 也能工作正常。

谢谢高手的指点。

论坛徽章:
46
15-16赛季CBA联赛之四川
日期:2018-03-27 11:59:132015年亚洲杯之沙特阿拉伯
日期:2015-04-11 17:31:45天蝎座
日期:2015-03-25 16:56:49双鱼座
日期:2015-03-25 16:56:30摩羯座
日期:2015-03-25 16:56:09巳蛇
日期:2015-03-25 16:55:30卯兔
日期:2015-03-25 16:54:29子鼠
日期:2015-03-25 16:53:59申猴
日期:2015-03-25 16:53:29寅虎
日期:2015-03-25 16:52:29羊年新春福章
日期:2015-03-25 16:51:212015亚冠之布里斯班狮吼
日期:2015-07-13 10:44:56
发表于 2011-03-24 16:31 |显示全部楼层
是不是可以这样理解,当没括号是 会把@_的长度 赋给了 $repl_status. 当加了括号,就相当于shift(@_)给 ...
Coolriver 发表于 2011-03-24 16:25



    shift 有副作用,不能说完全相等。别的都正确

论坛徽章:
0
发表于 2011-03-24 16:33 |显示全部楼层
仔细又阅读了数据和列表的转换。加那个括号,就是把一个变量转换成列表中的一个值。

不加括号是一个标准备变量。

如:my ($r, $d) = @_;  == $r = $_[0] ; $d =$_[1] 这样的性质。

谢谢 zhlong8 一语道破天机。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

DTCC2020中国数据库技术大会

【架构革新 高效可控】2020年12月21日-23日第十一届中国数据库技术大会将在北京隆重召开。

大会设置2大主会场,20+技术专场,将邀请超百位行业专家,重点围绕数据架构、AI与大数据、传统企业数据库实践和国产开源数据库等内容展开分享和探讨,为广大数据领域从业人士提供一场年度盛会和交流平台。

http://dtcc.it168.com


大会官网>>
  

北京盛拓优讯信息技术有限公司. 版权所有 16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122
中国互联网协会会员  联系我们:huangweiwei@it168.com
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP