高级函数
最后更新于:2022-04-01 21:07:43
## 上下文与 wantarray
Perl 有三种上下文:空、标量、以及列表。
~~~
func(); # void
my $ret = func(); # scalar
my ($ret) = func(); # list
my @ret = func(); # list
~~~
如果你在子例程或 `eval` 块中,你能够使用 `wantarray` 来决定想要的上下文。
以下是处理正则表达式返回值的上下文例子:
~~~
my $str = 'Perl 101 Perl Context Demo';
my @ret = $str =~ /Perl/g; # @ret = ('Perl','Perl');
my $ret = $str =~ /Perl/g; # $ret is true
~~~
## `..` 和 `...`
这些叫区间操作符,它们能够帮助代码处理整数或字符区间。
在下例中,`@array` 是手动填充的。这些是等价的:
~~~
my @array = ( 0, 1, 2, 3, 4, 5 );
my @array = 0..5;
~~~
当用于此种方式时,`..` 和 `...` 是等效的。
区间操作符只能增加。这会产生一个空列表:
~~~
my @array = 10..1; # @array is empty
~~~
如果你想要逆向,要求它。
~~~
my @array = reverse 1..10; # @array descends from 10 to 1
~~~
你也可以在标量上下文中使用区间操作符,但那超出了本节的范围。参阅手册页 了解细节。
';