Perl split 函数

Perl 的 split 函数将一个字符串分割成一个数组。字符串根据模式指定的定界符进行分割。默认情况下，空格被假定为定界符。

split 语法是

Perl split 示例

在这个例子中，split 返回一个字符串列表。分隔符是 (-)。这意味着字符串在 (-) 处被分割。

输出

		
Cu K Na Hg Pb Li

Perl split 限制分割部分的数量

我们可以限制一个字符串分割的块数。

在这个例子中，字符串被分割成 3 个部分。

输出

Perl split 在多个字符上分割

我们可以在多个分隔符处分割字符。在下面的例子中，我们在 (=) 和 (,) 处分割字符串。

输出

Vishal 18Sept Anu 11May Juhi 5Jul

因为它们是键值对，我们可以将结果赋值给哈希而不是数组。

输出

$VAR1 = (
		'Anu', => '11th May',
		'Vishal', => '18th Sept',
		'Juhi', => '5th Jul', 
);

Perl split 在空字符串上分割

在空字符串上分割意味着字符串将在找到空字符串的每个位置分割。在每两个字符之间都有一个空字符串。这意味着它将返回分割成单个字符的原始字符串。

输出

J A V A P O I N T

Perl join 函数

Perl join 字符使用分隔符模式连接元素成一个字符串来分隔每个元素。它是 split 的反义词。

join 语法是

Perl join 示例

在下面的例子中，我们用三种不同的方式连接。

首先，我们在数组的每个元素之间连接 (:)。

其次，我们将把 (- vowels) 与第一个的输出连接起来。

第三，我们在原始数组中添加了两个字符。

输出

A:E:I
A:E:I -vowels
AEIOU