Perl 基础语法

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

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

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

第一个 perl 程序

交互式编程

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

$ perl -e 'print "Hello World\n"'

输入以上命令，回车后，输出结果为：

Hello World

脚本式编程

 

代码中 /usr/bin/perl 是 perl 解释器的路径，表示该文本用perl解释；可以通过两种方式执行perl 脚本：

1）perl 文本名.pl

2)修改文本可执行权限后直接输入 文本名.pl

其中 print 用来输出信息，相当于 shell 中的 echo ，但是需要手动输入换行符 "\n" ，print 默认不换行；

perl中可以通过反引号来执行操作系统中的命令，如下：

可以看到pwd这个命令的返回值是带换行的，要去掉换行需要使用 chomp 函数，如下：

perl还可以通过自带的 ENV 哈希来访问操作系统中的环境变量，如下：

perl注释

使用注释使你的程序易读，这是好的编程习惯，perl 单行注释的方式和其他解释型语言语言，都是在语句的开头用字符#，如：

# 这一行是 perl 中的注释

perl 也支持多行注释，最常用的方法是使用 POD(Plain Old Documentations) 来进行多行注释，方法如下:

注意：

• =pod、 =cut只能在行首；
• 以 = 开头，以=cut或=pod结尾；
• =后面要紧接一个字符，=cut后面可以不用；
• perl 中除了最后一条语句外的每条语句后都要带分号，这是与python 不同的地方，python中的语句后不需要分号

Perl 中的空白

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

#!/usr/bin/perl
 
print       "Hello, world\n";

但是如果空格和分行出现在字符串内，会原样输出：

所有类型的空白如：空格，tab ，空行等如果在引号外解释器会忽略它，如果在引号内会原样输出；

单引号和双引号

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

从结果中我们可以看出，双引号 \n 输出了换行，而单引号没有；

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

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的用法。

实例

#!/usr/bin/perl
 
$a = 10;
$var = <<"EOF";
这是一个 Here 文档实例，使用双引号。
可以在这输如字符串和变量。
例如：a = $a

a
EOF
print "$var\n";
 
$var = <<'EOB';
这是一个 Here 文档实例，使用单引号。
例如：a = $a
EOB
print "$var\n";

执行以上程序输出结果为：

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

这是一个 Here 文档实例，使用单引号。
例如：a = $a 

转义字符

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

Perl 标识符

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

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