什么是插值

Perl 插入变量名称:

my $name = 'Paul';
print "Hello, $name!\n"; # Hello, Paul!

my @char = ('a', 'b', 'c');
print "$char[1]\n"; # b

my %map = (a => 125, b => 1080, c => 11);
print "$map{a}\n"; # 125

数组可以作为一个整体进行插值,它们的元素用空格分隔:

my @char = ('a', 'b', 'c');
print "My chars are @char\n"; # My chars are a b c

Perl 并没有插哈希作为一个整体:

my %map = (a => 125, b => 1080, c => 11);
print "My map is %map\n"; # My map is %map

和函数调用(包括常量):

use constant {
    PI => '3.1415926'
};
print "I like PI\n";         # I like PI
print "I like " . PI . "\n"; # I like 3.1415926

Perl 以\开头插入转义序列

\t                  horizontal tab
\n                  newline
\r                  return
\f                  form feed
\b                  backspace
\a                  alarm (bell)
\e                  escape

\n 的插值取决于程序工作的系统:它将根据当前的系统约定产生换行符。

Perl 并没有\v,这意味着在 C 和其他语言垂直制表符。

可以使用他们的代码来解决字符:

\x{1d11e}     𝄞 by hexadecimal code
\o{350436}    𝄞 by octal code
\N{U+1d11e}   𝄞 by Unicode code point

或 Unicode 名称:

\N{MUSICAL SYMBOL G CLEF}

在本编码中使用 0x000xFF 的代码的字符可以用更短的形式处理:

\x0a     hexadecimal
\012     octal

可以使用特殊的转义序列来处理控制字符:

\c@      chr(0)
\ca      chr(1)
\cb      chr(2)
...
\cz      chr(26)
\c[      chr(27)
\c\      chr(28) # Cannot be used at the end of a string
                 # since backslash will interpolate the terminating quote
\c]      chr(29)
\c^      chr(30)
\c_      chr(31)
\c?      chr(127)

大写字母具有相同的含义:"\cA" == "\ca"

除了\N{...} 之外的所有转义序列的解释可能取决于平台,因为它们使用依赖于平台和编码的代码。