Perl语言

Perl语言是一种解释型的脚本语言。Perl语言由Larry wall于1986年开发成功。当初的目的主要是在Unix环境下，用于处理面向系统任务而设计的脚本编程语言。Perl对文件和字符有很强的处理、变换能力，它特别适用于有关系统管理、数据库和网络互联以及WWW程序设计等任务，这样使得Perl称为系统维护管理者和CGI编制者的首选工具语言。

Perl语言中的变量有3种：纯变量(scalar variable)、数组(array)和关联数组(associative array)。

纯变量又称标量变量，是Perl语言处理的最简单的数据类型。标量可以是数字(如2、3、2．5e6)，也可以是字符串(如“hello”、“生物信息”)。

Perl语言中的标量变量以$和一个字母开始，以后可以是字母、数字和下划线，大小写有区别，而且所有字母、数字和下划线都有效。如：$a和$A是不同的变量。

Perl语言中的变量可以通过操作符(如+或．等)来产生新的变量。可以从文件和设备中读取变量，也可以将其输出。使用纯量变量时要在前面加上$符号。

标量数据可分为数字和字符串两种，数字又可分为整型变量和浮点变量。

整型变量，如2、-200、3568等。Perl语言支持8进制和16进制变量，8进制以0开头(如0255，表示8进制的255)，16进制以0x或0X开头(如一0xlA，代表负的1A)。浮点变量，如2．5、一6．3e5、一2．3e一6等。

最短的字符串可以没字符，称为空字符，最长可以把内存填满，这与Perl语言的“无内置限制”的原则一致。

字符串有两种格式：单引字符串和双引字符串。

单引字符串(single-quoted string)就是用单引号括起来的一串字符。

双引字符串(double-quoted string)就是用双引号括起来的一串字符。

数组是标量数据的有序列表。数组可以含任意多个元素，最小的数组可以不含元素，而最大的数组可以占满全部可用内存。数组实量(array literal)是位于括号内用逗号分开的一系列值。如：(1，2，3，4，5)表示有5个数值的数组。

数组变量具有单独的数组值，要以@打头。如：@zmd

数组的赋值和标量赋值一样，也用等号表示。Perl语言根据赋值对象是标量还是数组变量来确定赋值操作是标量赋值还是数组赋值。

若数组实量中只含有变量引用(不是表达式)，则此数组实量也可作为变量使用。它可以用在赋值运算符的左边。例如：($a，$b，$c)一(1，2，3)表示将1赋给$a，2赋给$b，3赋给$c。

关联数组和数组类似，它包含标量数据，可用索引值来单独选择这些数据；和数组不同的是，关联数组的索引值不是非负的整数而是任意的标量。这些标量称为关键字(key)，可以在以后用于检索数组中的数值(value)。关联数组的元素没有特定的顺序，可以把它们想像为一组卡片。每张卡片上半部分是索引而下半部分是数值。

关联数组是Perl语言中特有的，关联数组是一个功能强大的数组。使用关联数组时要在前面加上%号，关联数组的格式如：ARRAY=(key1，valuel，key2，Value2，key3，value3)，其中每一个关键字都有一个相对应的值。