Perl 获得与打印相同的性能<&书信电报；文件（打印<；<；&x27；文件&x27；）到标准输出

我试过这个例子：

#!C:/Perl64/bin/perl.exe

$mickey = "Hi i'm Mickey";
$pluto = "Hi i'm Pluto";

print <<EOF;
$pluto
Hi i'm Goofy
$mickey
EOF

print <<'EOF';
$pluto
Hi i'm Goofy
$mickey
EOF

如果不希望发生插值，我希望使用whitout获得相同的行为，使用

使用单引号（或
q/STRING/
）而不是双引号：

$mickey = "Hi I'm Mickey";
$pluto = "Hi I'm Pluto";

print STDOUT q{$pluto
Hi I'm Goofy
$mickey};

STDOUT
在这里也是多余的，这是默认设置<代码>打印“foo$bar”

就足够了。

如果不希望发生插值，请使用单引号（或

q/STRING/

）而不是双引号：

$mickey = "Hi I'm Mickey";
$pluto = "Hi I'm Pluto";

print STDOUT q{$pluto
Hi I'm Goofy
$mickey};

print <<"EOF";   # <<EOF is short for <<"EOF"
$pluto
Hi i'm Goofy
$mickey
EOF

print <<'EOF';
$pluto
Hi i'm Goofy
$mickey
EOF

STDOUT

在这里也是多余的，这是默认设置<代码>打印“foo$bar”就足够了

print <<"EOF";   # <<EOF is short for <<"EOF"
$pluto
Hi i'm Goofy
$mickey
EOF

print <<'EOF';
$pluto
Hi i'm Goofy
$mickey
EOF

注意所用引号之间的平行性

不幸的是，因为分隔符存在于文本中，所以必须对其进行转义

注意所用引号之间的平行性

不幸的是，因为分隔符存在于文本中，所以必须对其进行转义

如何转义每个perl特殊字符

使用“\”来完成此操作

my $var = "test";

print "\$var\n";
print "$var\n";

输出：

$var
test

如何转义每个perl特殊字符

使用“\”来完成此操作

my $var = "test";

print "\$var\n";
print "$var\n";

输出：

$var
test

---

阅读Perl中的引文阅读Perl中的引文