双引号("")字符串能够内插其他变量。
非内插字符串
如果你不想要内插,那么使用单引号('')。
或者,你也可以转义特殊字符(印记)。
print "You may have won \$1,000,000";
my $email = "andy@foo.com";
print $email;
这里的问题是 @foo 作为数组被内插了。如果你打开了 use
,那么此类问题就很明显了:
warnings
解决办法是,要么使用非内插的引号:
my $email = 'andy@foo.com';
my $email = q{andy@foo.com};
要么转义 @:
my $email = "andy\@foo.com";
使用 length() 获得字符串的长度
my $str = "Chicago Perl Mongers";
print length( $str ); # 20
substr()
能够做各种字符串提取:
关于字符串 vs. 数字不必担心太多
不像其他语言,Perl 不知道字符串来自于数字。它将做最好的 DTRT。
my $exchange = substr( $phone, 4, 3 ); # 588
print sqrt( $exchange ); # 24.2487113059643
你能够利用 ++
来自增字符串。字符串abc
自增后变成abd
。
$ cat foo.pl
$a = 'abc'; $a = $a + 1;
$c = 'abc'; $c++;
print join ", ", ( $a, $b, $c );
$ perl -l foo.pl
1, 1, abd
利用 heredocs 创建长字符串
Heredocs 允许连续文本,直到遇到下一个标记。使用内插,除非标记在单引号内。
my $page = <<HERE;
<html>
<head><title>$title</title></head>
<body>This is a page.</body>