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 表示两个不同变量。