Perl 的 join 函数

描述

此函数使用 EXPR 将 LIST 元素合并到一个字符串中，并用 EXPR 值分隔各个元素。实际上，它与 split 相反。

请注意，EXPR 仅插入到 LIST 中元素对之间；它不会放在字符串中第一个元素之前或最后一个元素之后。要连接字符串而不使用分隔符，请提供一个空字符串，而不是 undef。

语法

以下为该函数的简单语法 −

join EXPR, LIST

返回值

此函数返回连接的字符串。

示例

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

#!/usr/bin/perl

$string = join( "-", "one", "two", "three" );
print"Joined String is $string\n";

$string = join( "", "one", "two", "three" );
print"Joined String is $string\n";

当执行上面的代码时，将产生以下结果 −

Joined String is one-two-three
Joined String is onetwothree