什么是插值
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}
在本机编码中使用 0x00
到 0xFF
的代码的字符可以用更短的形式处理:
\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{...}
之外的所有转义序列的解释可能取决于平台,因为它们使用依赖于平台和编码的代码。