Perl 的变量

1 简单变量

Perl 的 Hello World 是怎么写的呢？请看下面的程序：

#!/usr/bin/perl
print "Hello World"

这个程序和前面 BASH 的 Hello World 程序几乎相同，只是第一行换成了 #!/usr/bin/perl ，还有显示的时候用的是 print，而不是 echo。有了前面 BASH 基础和 C 语言的基础，许多 Perl 的知识可以很容易的就看懂和记住，下面我们就从简单变量开始。

简单变量是标量，是 Perl 处理的最简单的数据类型。标量可以是数字(如2,3或2.5e6)， 也可以是字符串。Perl 中的标量变量以美元符号 "$" 和一个字母开始，后面可以跟字母、数字和下划线，Perl 的变量区分大小写，因此 $a 和 $A 是代表不同的变量。和 BASH 中不同的是 Perl 语言中的变量即使是在最初赋值的时候也必须在变量前面加上 "$" 符号，而且 Perl 不要求 "=" 左右必须没有空格。

虽然 Perl 中和 BASH 一样，没有变量类型的概念，我们还是可以把简单变量分为数值型和字符串型来理解。在赋值时，如果是赋值成字符串，则需要在字符串两边加上双引号（或单引号）；如果是数值则就不用了，而且 Perl 中还可以接受8/16（以0开头/以0x或0X开头）进制的整数，还可以接受如 2.5,-6.3e5,-2.3-e6 这样的浮点数。关于简单变量举例如下：

$a=23;
$a = "hello";
$a = 010;（表示十进制的 8）
$a = 0x10;
$a = 0X10;

和 C 语言类似，在双引号之中可以用反斜杠表示一些特殊转义字符，见下表：

另外在 Perl 语言里，我们常会看到 my 这样的变量定义，如：

my $a = "local var";

这表示 $a 是一个程序块的局部变量。

2  数组

数组是标量数据的有序列表。数组可以含从 0 个元素大小 直到 你计算机内存可以支持的大小。数组用括号内以逗号分隔的一系列元素来表示。如：

@a=(1,2,3,4,5)
@a=("aka",1974,173.5)

在 Perl 中对数组变量和前面的简单变量的存储是在不同的空间中，对数组的引用需要在变量前加 "@" 符号。

数组的赋值由下面几种用法需要注意：

3    关联数组

关联数组是 Perl 语言中特有的一种数据结构，是一个功能强大的数组，他与普通数组的不同在于关联数组不是通过整数下标来索引，而是通过“键值”进行索引。使用关联数组需要在变量前面加上 "%" 号，关联数组的格式如：

ARRAY=(key1,value1,key2,value2,key3,value3);

上面每个 key 都对应着一个 value。关联数组是存在在另外一个存储空间中，不和简单变量以及数组相混淆。

对关联数组的操作有如下规则：

1. 在关联数组中增加、更改一对数据：ARRAY={key}=value; 在关联数组ARRAY中加上一对 key-value，要在关联数组名称前加上 $ 号，而且 key 的名称要在 {} 符号之间，最后再指定 key 所对应的 value 值。如果在这个关联数组中已经有这个 key 了.就会更改这个 key 所对应的 value 。
   
2. keys(%array) 操作符可生成由关联数组 %array 中的所有当前关键字组成的列表。即返回奇数号元素(第1,3,5,7...个)的列表。
   
3. values(%array) 操作符返回由关联数组 %array 中所有当前值组成的列表，即返回偶数个列表。
   
4. echo(%array) 操作符返回由 关键字/值对 构成的元素对列表。对同一数组再进行此操作时返回下一对值直至结束。若没有更多的对时，echo() 返回空表。 (这在打印全部列表中很有用)
   
5. 删除一对在关联数组中的数据：delete $ARRAY{key}; delete 是 Perl 所提供的函数，作用是删除关联数组中的一个 key 以及这个 key 所对应的 value。使用方法是在 delete 函数之后，指定关联数组中要删除的 key 名称。

下面是一些关联数组操作的例子：

4    各种运算符号汇总

赋值(Assignment)运算符
算术(Arithmetic)运算符
数值(Numeric Values)关系运算符
字符串(String Values)关系运算符
逻辑(Logical)运算
其它常用的运算符
常用的文件数据(File Test)运算符