Perl 分割函数

说明

此函数根据 PATTERN 指定的分隔符将字符串表达式拆分为域。如果未指定模式，则默认为空白。可选的限制限制了返回的元素数量。

负限制与无限制有相同的效果。此函数通常与 join() 结合使用，以创建小文本数据库。

语法

以下是此函数的简单语法 -

split /PATTERN/, EXPR, LIMIT

split /PATTERN/, EXPR

split /PATTERN/

split

返回值

• 标量上下文中的返回值：不推荐，但它会返回找到的域的数量并将域存储在 @_ 数组中。

• 数组上下文中的返回值：EXPR 中找到的域列表，如果没有指定表达式，则为 $_。

示例

以下示例代码显示了其基本用法 -

#!/usr/bin/perl -w

@fields = split(/:/, "1:2:3:4:5");
print "Field values are: @fields\n";

执行以上代码后，将产生以下结果 -

Field values are: 1 2 3 4 5