perl编写genesis脚本

一perl是什么？二perl在哪里？三运行四注释一、Perl是什么?

Perl是Practical Extraction and Report Language的缩写，它是由Larry Wall设计的，并由他不断更新和维护，用于在UNIX环境下编程。

.Perl具有高级语言（如C）的强大能力和灵活性。事实上，你将看到，它的许多特性是从C语言中借用来的。

.与脚本语言一样，Perl不需要编译器和链接器来运行代码，你要做的只是写出程序并告诉Perl来运行而已。这意味着Perl对于小的编程问题的快速解决方案和为大型事件创建原型来测试潜在的解决方案是十分理想的。

.Perl提供脚本语言（如sed和awk）的所有功能，还具有它们所不具备的很多功能。Perl还支持sed到Perl及awd到Perl的翻译器。

简而言之，Perl象C一样强大，象awk、sed等脚本描述语言一样方便。

二、Perl在哪里?

Perl通常位于/usr/local/bin/perl或/usr/bin/perl中。你可以在Internet用匿名FTP免费得到它，如{{ftp://prep.ai.mit.edu/pub/gnu/perl-5.004.tar.gz}}。 安装过程为：

(1)解压：

$gunzip perl-5.004.tar.gz $tar xvf -

$make makefile (3)放置：

将编译生成的可执行文件拷贝到可执行文件通常所在目录，如： $copy /usr/local/bin/perl 注：这需要系统管理员权限。

三、运行

用文本编辑器编辑好你的Perl程序，加上可执行属性：$chmod +x 就可以执行了：$./。如果系统提示：\，则说明你没有安装成功，请重新安装。

注：你的程序的第一行必须为#!/usr/local/bin/perl（perl所在位置）。

四、注释：

注释的方法为在语句的开头用字符#，如： # this line is a comment

注：建议经常使用注释使你的程序易读，这是好的编程习惯。未完待续本教程为flamephoenix翻译整理本教程欢迎下载、转载和链接，转载必须保留本说明并保持文章完整。本教程不允许以任何形式用于商业用途。

对本教程有何疑问、更正或建议请告诉我，谢谢。

第二章 简单变量 一整型二浮点数三字符串基本上，简单变量就是一个数据单元，这个单元可以是数字或字符串。 一、整型 1、整型

PERL最常用的简单变量，由于其与其它语言基本相同，不再赘述。 例：

$x = 12345;

if (1217 + 116 == 1333) { # statement block goes here }

整型的限制：

PERL实际上把整数存在你的计算机中的浮点寄存器中，所以实际上被当作浮点数看待。在多数计算机中，浮点寄存器可以存贮约16位数字，长于此的被丢弃。整数实为浮点数的特例。 2、8进制和16进制数

8进制以0打头，16进制以0x打头。 例：$var1 = 047; (等于十进制的39) $var2 = 0x1f; (等于十进制的31) 二、浮点数

如 11.4 、 -0.3 、.3 、 3. 、 54.1e+02 、 5.41e03

浮点寄存器通常不能精确地存贮浮点数，从而产生误差，在运算和比较中要特别注意。指数的范围通常为-309到+308。

例：

#!/usr/local/bin/perl

$value = 9.01e+21 + 0.01 - 9.01e+21; print (\ $value = 9.01e+21 - 9.01e+21 + 0.01; print (\

---------------------------------------------------------

$ program3_3 first value is 0

second value is 0.01 三、字符串

惯用C的程序员要注意，在PERL中，字符串的末尾并不含有隐含的NULL字符，NULL字符可以出现在串的任何位置。

. 双引号内的字符串中支持简单变量替换，例如： $number = 11;

$text = \ 则$text的内容为：\

.双引号内的字符串中支持转义字符 Table 3.1. Escape sequences in strings.

\\L、\\U、\\Q功能可以由\\E关闭掉，如：

$a = \

.要在字符串中包含双引号或反斜线，则在其前加一个反斜线，反斜线还可以取消变量替换，如：

$res = \ $result = 14;

print (\的结果为： The value of $result is 14.

.可用\\nnn(8进制)或\\xnn(16进制)来表示ASCII字符，如： $result = \ $result = \

.单引号字符串

单引号字符串与双引号字符串有两个区别，一是没有变量替换功能，二是反斜线不支持转义字符，而只在包含单引号和反斜线时起作用。单引号另一个特性是可以跨多行，如：

$text = 'This is two lines of text ';

与下句等效：

$text = \