Perl join用法及代码示例

描述

此函数使用 EXPR 的值将 LIST 的元素组合成单个字符串，以分隔每个元素。它实际上与拆分相反。

请注意，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