Perl join 函数
描述
该函数将 LIST 的元素组合成一个字符串，使用 EXPR 的值来分隔每个元素。 它实际上与拆分相反。
请注意，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
