本文介绍了Perl 子参考语法的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
那里 - 刚开始学习 Perl.
there - just started learning Perl.
这就是我将数组放入子函数所做的工作 - 可以在 1 行中更简单地完成吗?
This is what I'm doing to get an array into a subfunction - can it be done simpler in 1 line?
sub my_sub {
my $ref_array = shift;
my @array = @$ref_array;
}
推荐答案
如果你也想要shift
的效果,
sub my_sub {
my @array = @{+shift};
}
一元 +
运算符 强制shift
被视为表达式,而不是变量名.(否则 @{shift}
与 @shift
的意思相同.)
The unary +
operator forces shift
to be treated as an expression, not a variable name. (Otherwise @{shift}
means the same as @shift
.)
这篇关于Perl 子参考语法的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!