查看“Perl 基础语法”的源代码

{{DISPLAYTITLE:Perl 基础语法}}[[Category:Perl 教程|4]]
= Perl 基础语法 =

Perl借用了C、sed、awk、shell脚本以及很多其他编程语言的特性，语法与这些语言有些类似，也有自己的特点。

Perl 程序有声明与语句组成，程序自上而下执行，包含了循环，条件控制，每个语句以分号 (;) 结束。

Perl 语言没有严格的格式规范，你可以根据自己喜欢的风格来缩进。

== 第一个 perl 程序 ==

=== 交互式编程 ===

你可以在命令行中使用 '''-e''' 选项来输入语句来执行代码，实例如下：

<pre>
$ perl -e 'print &quot;Hello World\n&quot;'
</pre>
输入以上命令，回车后，输出结果为：

<pre>
Hello World
</pre>
=== 脚本式编程 ===

我们将以下代码放到 '''hello.pl''' 文件中：

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

# 输出 "Hello, World"
print "Hello, world\n";
 </sample>
代码中 '''/usr/bin/perl''' 是 perl 解释器的路径。在执行该脚本前要先确保文件有可执行权限，我们可以先将文件权限修改为 0755 ：

<pre>
$ chmod 0755 hello.pl
$ ./hello.pl
Hello, world                   # 输出结果
</pre>
print 也可以使用括号来输出字符串，以下两个语句输出相同的结果：

<pre>
print(&quot;Hello, world\n&quot;);
print &quot;Hello, world\n&quot;;
</pre>
== 脚本文件 ==

perl 代码可以写在一个文本文件中，以 .pl、.PL 作为后缀。

文件名可以包含数字，符号和字母，但不能包含空格，可以使用下划线（_）来替代空格。

一个简单的Perl 文件名：

<pre>run_oob.pl</pre>
== 注释 ==

使用注释使你的程序易读，这是好的编程习惯。

perl 注释的方法为在语句的开头用字符#，如：

<pre>
# 这一行是 perl 中的注释
</pre>
perl 也支持多行注释，最常用的方法是使用 POD(Plain Old Documentations) 来进行多行注释。方法如下:

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

# 这是一个单行注释
print "Hello, world\n";

=pod 注释
这是一个多行注释
这是一个多行注释
这是一个多行注释
这是一个多行注释
=cut
 </sample>
执行以上程序，输出结果为：

<pre>
Hello, world
</pre>
<blockquote>'''注意：'''

* =pod、 =cut只能在行首。
* 以=开头，以=cut结尾。
* =后面要紧接一个字符，=cut后面可以不用。
</blockquote>

== Perl 中的空白 ==

Perl 解释器不会关心有多少个空白，以下程序也能正常运行：

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

print       "Hello, world\n";
 </sample>
执行以上程序，输出结果为：

<pre>
Hello, world
</pre>
但是如果空格和分行出现在字符串内，他会原样输出：

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

# 会输出分行
print "Hello
          world\n";
 </sample>
执行以上程序，输出结果为：

<pre>
Hello
          world
</pre>
所有类型的空白如：空格，tab ，空行等如果在引号外解释器会忽略它，如果在引号内会原样输出。

== 单引号和双引号 ==

perl 输出字符串可以使用单引号和双引号，如下所示：

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

print "Hello, world\n";    # 双引号
print 'Hello, world\n';    # 单引号
 </sample>
输出结果如下：

<pre>
Hello, world
Hello, world\n
</pre>
从结果中我们可以看出，双引号 \n 输出了换行，而单引号没有。

Perl双引号和单引号的区别: 双引号可以正常解析一些转义字符与变量，而单引号无法解析会原样输出。

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

$a = 10;
print "a = $a\n";
print 'a = $a\n';
 </sample>
输出结果如下：

<pre>
a = 10
a = $a\n
</pre>

== Here 文档 ==

Here文档又称作heredoc、hereis、here-字串或here-脚本，是一种在命令行shell（如sh、csh、ksh、bash、PowerShell和zsh）和程序语言（像Perl、PHP、Python和Ruby）里定义一个字串的方法。

使用概述：

* 1.必须后接分号，否则编译通不过。
* 2.END可以用任意其它字符代替，只需保证结束标识与开始标识一致。
* 3.结束标识必须顶格独自占一行(即必须从行首开始，前后不能衔接任何空白和字符)。
* 4.开始标识可以不带引号号或带单双引号，不带引号与带双引号效果一致，解释内嵌的变量和转义符号，带单引号则不解释内嵌的变量和转义符号。
* 5.当内容需要内嵌引号（单引号或双引号）时，不需要加转义符，本身对单双引号转义，此处相当与q和qq的用法。

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

$a = 10;
$var = <<"EOF";
这是一个 Here 文档实例，使用双引号。
可以在这输入字符串和变量。
例如：a = $a
EOF
print "$var\n";

$var = <<'EOF';
这是一个 Here 文档实例，使用单引号。
例如：a = $a
EOF
print "$var\n";
 </sample>
执行以上程序输出结果为：

<pre>
这是一个 Here 文档实例，使用双引号。
可以在这输入字符串和变量。
例如：a = 10

这是一个 Here 文档实例，使用单引号。
例如：a = $a
</pre>
== 转义字符 ==

如果我们需要输出一个特殊的字符，可以使用反斜线（\）来转义，例如输出美元符号($):

<sample title="" desc="" lang="perl" hererun="1">
#!/usr/bin/perl

$result = "小白教程 \"xiaobai\"";
print "$result\n";
print "\$result\n";
 </sample>
执行以上程序输出结果为：

== Perl 标识符 ==

Perl 标识符是用户编程时使用的名字，在程序中使用的变量名，常量名，函数名，语句块名等统称为标识符。

* 标识符组成单元：英文字母（a~z，A~Z），数字（0~9）和下划线（_）。
* 标识符由英文字母或下划线开头。
* 标识符区分大小写，$xiaobai 与 $xiaoBai 表示两个不同变量。