将数组插入到字符串中

beyes

和标量一样，可以将数组插入到字符串种。插入时，数组的各个元素会自动添加分隔用的空格，但首尾空格不会被添加 -- 这种情况需要自己手工解决。

下面演示了多种内插数组到字符串中的情形，并包含了一些需要进行转义以避免歧义的特殊情况：

[Perl] 纯文本查看 复制代码

#!/usr/bin/perl

#一般情况
@array = qw{go around};
print "Those people @array preaching revolution.\n";

@groad = qw{welcome to};
$email = "[email]beyes@groad.net[/email]";
print "My email is $email\n";   #展开的是数组

$email = "beyes\@groad.net";    #转义 '@' 符号
print "My email is $email \n";

$email = '[email]beyes@groad.net[/email]';     #单引号里面的内容保持原汁原味
print "My email is $email \n";

@groad = qw(welcome to groad net);
$groad = "domain";

#数组名和普通变量名同名时避免误解的方法(这里要输出 [3] 而不是将其当做是数组的索引)
print "It is $groad[2]\n";
print "It is ${groad}[3]\n";    #使用花括号避免误解
print "It is $groad\[3]\n";     #使用反斜杠转义
print "It is $groad"."[3]\n";   #使用 '.' 连接符号

运行输出：

./InsertArray.pl
Those people go around preaching revolution.
My email is beyeswelcome to.net
My email is beyes@groad.net
My email is beyes@groad.net
It is groad
It is domain[3]
It is domain[3]
It is domain[3]