本文和大家重点讨论一下Perl语法中Perl变量的概念，Perl变量分为标量变量,数组变量,联系关系数组变量3类.Perl的变量对巨细写敏感,好比:An,AN,an是3个分歧的变量,可是分歧范例的变量可以利用统一个名字。
Perl语法简介
1.Perl变量
1.1.Perl语法中Perl变量分类
Perl变量分为标量变量,数组变量,联系关系数组变量3类.Perl的变量对巨细写敏感,好比:An,AN,an是3个分歧的变量,可是分歧范例的变量可以利用统一个名字,好比:VAR可所以一个标量变量,同时也可以有一个数组变量也是VAR.这是由于Perl对每种范例的变量接纳自力的名字空间,别的Perl的变量,可以存储任何范例的数据,无须像C那样声明变量,数据范例之间会主动转换,同时Perl变量也有全局与历程变量之分,默认是全局变量.
1.2.Perl变量
1.2.1Perl语法中Scalar变量(标量变量)
标量变量只能存放一个值.Perl中的标量变量名总以字符$开首.下面的Perl语句把9这个值赋给标量变量$nine.把"BATI"赋给标量变量$name.然后用PRINT语句打印出来.
复制代码 代码如下:
$nine=9;
$name='BATI';
print($name,'is',$nine);
把上述语句存为TEST01.PL文件,然后再在DOS情况下(WIN9X的MS-DOS体例也可以)运行:
C:\Perl5>PerlTEST01.PL(回车)
BATIis9(什么?很眼熟??是阿,Perl和我们常用C便是这么相似)
1.2.2Perl语法中数组变量
数组是一次可以或许存储多个变量的表.它的赋值方式如下:
@weekdays=('Sun','Mon','Tue','Wed','Thu','Fri','Sat');
print(@weekdays);#输出为:SunMonTueWedThrFriSat
print($weekdays[1]);#输出为:Sun
@work=@weekdays[1..5];#此时,数组work的值为('Mon','Tue",...,'Fri');
@none=();#暗示空数组
数组变量名以@开首,[]内是数组的下标值,下标值从0起头.这与C依然很相似.
同样的在Perl中,若是只稀有组名,而纰漏下标的话,也会像C那样输出整个输出,好比:
第一个输出语句.
但请注重在输出Sun那一句时,当我们引用数组中某一个值的时辰,我们不再利用@,而是利用$作为变量的开首,由于就单个值而言,它是一个标量变量,以是如斯(这和C可纷歧样哦)固然你还得给出下标值.
在给数组work赋值的语句中,我们用到了SLICE初始化数组,你不必体贴什么是SLICE,你只要记着这种情势就可以了,实在SLICE是表格的一部门,是官方的暗示.
对数组的赋值是多种多样的.前面我们看到的都是用值对数组赋值,同样你也可以用变量大概另一个数组的值给数组赋值,好比:
@name=($firstname,@lastname);
@say=('Hesaid',@saysomething);
以下是SLICE的例子:
复制代码 代码如下:
@weekend=@weekdays[0,6];#数组weekend的值为('Sun','Sat')
print(@weekdays[1..5,0,6]);#输出成果为'MonTueWedThuFriSunSat'
Perl还撑持一种特别机关符$#var,它是用来返回数组末了一个索引值.好比下面的语句操纵$[机关符确定命组的第一个索引值,用$#var确定命组末了的索引值,然后表现整个数组:
for($i=$[;$i<=$#buffer;$i++){print$buffer[$i];}
上面语句与print@buffer;的输出成果是一样的.
1.2.3Perl语法中标量与数组变量
表机关符(,)与挨次计值运算符(,)很是相似.是以,Perl挪用哪一个运算符取决于号令文件运行时的详细环境,即文件正在利用数组仍是标量值.Perl在数组表达式中挪用表布局符,在挨次计值中挪用计值运算符.请思量以下两个表达式:
@an_array=(1,2,3,4,5);
$a_scalar=(1,2,3,4,5);
第一个语句初始化一个数组,第二句把$a_scalar变量的值设为5,并且打消了前4个元素的赋
值感化.
再来看一个例子:
复制代码 代码如下:
print$assoc{1,2};
@print$assoc{1,2};
第一句打印二维联系关系数组的一个元素值,而第二句打印一维数组的两个元素值.
1.2.4Perl语法中联系关系数组变量
联系关系数组变量与数组变量很相似,都可以存储标量变量的表.它们的区别在于数组变量必需经由过程整数下标来引用数组元素,而联系关系数组变量可以经由过程任何值作为下标而到达拜候数组元素的目标.联系关系数组的下标我们称之为键值(Key),是一种索引值.下面我们经由过程一个例子来明白:
复制代码 代码如下:
$ages{'Bob'}=35;
$ages{'Mary'}=25;
$,='';
print@ages{'Bob','Mary'};
printkeys(%ages);
for$name(keys(%ages))
{
print"$nameis$ages{$keys}\n";
}
法式把一个值赋给'$,'变量,如许今后的print语句的输出会受到影响,关于特别变量'$,'我们将在今后先容.Perl挪用联系关系数组变量时,利用花括号{}括起键值.
@ages{'Bob','Mary'}在花括号内给出了键值,暗示引用一个元素,此语句中有两个键值,暗示引用数组的一部门,其成果应为(35,25)与($ages{'Bob'},$ages{'Mary'})语句的成果不异.
printkeys(%ages)利用了keys运算符.其成果将返回联系关系数组的全部键值,构成一个表.%ages暗示引用整个联系关系数组.
请注重轮回语句中的print语句,在这里我们看到了在""(双引号)中插入变量的用法,这长短常有效的.在输出成果的时辰,变量将被替代成变量的值作为输出的终极成果,这便是所谓的内插法.可是Perl不许可在''(单引号)中插入变量!!!!
