本文和大家重点讨论一下Perl语言中的变量类型，Perl语言中的变量有以下五种：标量，指针，数组，哈希表（hash）和句柄。每种类型都有各自的特点和作用，下面请看本文详细介绍。
Perl语言中的变量类型
Perl语言中的变量有以下五种：
标量，指针，数组，哈希表（hash）和句柄。
一、Perl语言之标量
我们先来看看标量，标量是Perl语言中最简单的一种数据类型。这种数据类型的变量可以是数字，字符串，浮点数，不作严格的区分。在使用时在变量的名字前面加上一个“$”,表示是标量，相当于scalar中的***个S。
使用以下格式进行定义：
$myfirst=123; #数字123
$mysecond="123"; #字符串123
$mythird="$myfirst,$mysecond"; #字符串123,123
$myforth='$myfirst,$mysecond'; #字符串$myfirst,$mysecond
数字类型的标量可以使用0开头代表是8进制，用0x开头代表是16进制。例如：
$var1=017; #十进制的15
$var2=0xf; #十进制的15
还可以使用下面的格式：
$var3=123_456_7; #1234567
浮点数可以使用以下定义方式：
$var4=3.4;
$var5=4.3e+21;
$var6=234E345;
Perl中的字符串使用一个标量来表示，定义方式和c很像，但是在Perl里面字符串不是用0来表示结束的。而且使用双引号和单引号定义的字符串是不一样的。使用双引号定义的字符串里面出现的变量名会进行替换，而且可以出现“ ”等控制字符。而用单引号定义的就不可以了使用反斜杠引导的控制命令了（当然还可以使用反斜杠引道单引号和反斜杠），文本会按照字符串原来的样子保存。
但是用单引号定义可以使用多行文本，如下所示：
$var7='这是一个使用
多行字符串文本
的例子';
$var8='''; #字符串'
二、Perl语言之数组
在Perl中数组使用“@”引导，“@”的意义应该是相当于array中的***个a吧(嘻嘻，猜的)。数组初始化使用（）。我们可以采用如下方法初始化数组：
@var9=(1,2,3,4,5);
而当引用数组中的元素时则使用下面的格式：
$var10=$var9[1];
数组前面的引导字符变成了“$”,表示这里是引用数组中的元素。
如果使用“@”作引导字符，那么刚才的例子就会返回数组的长度。例如：
$length=@var9; #则$length会返回数组长度也就是数组的元素个数5
三、Perl语言之哈希表（hash）
哈希表是一种很特别的数据结构，我在学习数据结构时见过，叫做散列（Set），在使用Perl之前，我在borlandC++中见过一种类似的class，也叫做Set。在JavaScript中也提供了相似的数据结构，叫做关连数组AssociatedArray。
哈希表用“%”引导。定义方法如下:
%var11=("hello"=>"哈罗","nihao"=>"你好");
使用方法如下：
print$var11{"hello"}; #输出哈罗$var11{"nihao"}="你好";
还可以使用下面的方法定义：
%var12=("hello","哈罗","nihao","你好");
这个方法的结果与上面的结果相同，但是我还是喜欢***种方法，而且建议你也使用***种方法。
四、Perl语言之句柄
句柄是一种特殊的数据，用来保存系统资源的指针，例如文件，目录，管道，socket等等。在***的Perl中，实际上可以不使用这种数据。句柄类型没有引导字符。一般情况下大家习惯使用大写字母来标明句柄类型。例如下面的例子打开一个文件，读出一行，然后关闭。
open(FILEHANDLE,"test.htm");
$templine=<FILEHANDLE>;
close(FILEHANDLE);
这里<>起从句柄中读出一行的作用。
五、Perl语言之指针
Perl里面的指针分为两种类型，一种成为软指针，另一种称为硬指针。下面将主要介绍一下硬指针。在Perl里面使用“”来生成指针。如下面的例子：
- $vavr13="hello";
- $pointerto=$var13;
这时$pointerto就是一个指向$var13的指针了。访问指针指向的数据可以使用下面的方法。print$$pointerto;也就是加上一个$就可以了。Perl里面的指针与c里面的不同，Perl里面的指针是有引用计数的。也就是说，如果一个数据可以记住自己被几个指针引用，当没有指针引用时这个数据会自动释放内存。
【编辑推荐】
