perl程序设计(三)
二、数组
数组是标量数据的有序列表。
数组可以含任意多个元素。最小的数组可以不含元素，而最大的数组可以
占满全部可用内存。
数组实量(array literal)是位于括号内用逗号分开的一系列值。如：
（1,2,3,4,5）#具有1,2,3,4,5五个数值的数组
（"zmd",1974,173.5）#具有"zmd",1974,173.5三个数值的数组
（）#空数组
（$a,5）#两个数值：$a的值和5
（$a+$b,6）#两个数值
数组变量具有单独的数组值，要以@打头而不是$。如：
@zmd
注意@zmd与$zmd没任何联系。Perl为工具的不同范例保存独立的命名空
间。
数组的赋值和标量赋值一样，也用等号表示。Perl凭据赋值工具是标量还
是数组变量来确定赋值操作是标量赋值照旧数组赋值。
若数组实量中只含有变量援用(不是表达式)，则此数组实量也可作为变量
利用。它可以用在赋值运算符的右边。例如：
($a,$b,$c)=(1,2,3) #将1赋给$a，2赋给$2，3赋给$3
要是把数值变量赋给标量变量，则赋给标量变量的就是数组长度，如：
@zmd=(1,2,3) # 将(1,2,3)赋给@zmd
$a=@zmd # $a为3，即@zmd的数组个数
数组元素的拜访和C言语中类似，下标是按顺序整数分列的，编号从0开
始。
($a,$b,$c)=(1,2,3) #将1赋给$a，2赋给$2，3赋给$3
要是把数值变量赋给标量变量，则赋给标量变量的就是数组长度，如：
@zmd=(1,2,3) # 将(1,2,3)赋给@zmd
$a=@zmd # $a为3，即@zmd的数组个数
综合举例
@user1=("zmd","cxm");
#将zmd和cxm两个字符串赋给
@user1
@user2=@user1;
#这时
@user2=@user1=("zmd","cxm")
@user3=("zk",@user1);
#这时
@user3=("zk","zmd","cxm")
($one,@user4)=@user3;
#这时$one="zk"
@user1=();
#把@user1清空
@int1=(1,2,3,4,5); $x=@int1;
#将数组@int1的个数赋给$x纯
变量，$x=5
$x=$#int1;
#$#这个变量返回数组末了个数
的值(index)$x=4
($x)=@int1;
#$x等于数组的第一个个数值
$x=1
$b=$int1[0];
#$b等于数组的第一个元素值
$b=1
$c=@int1[0];
#$c同上$c=1，因些呼唤数组中
值有两种方法
$int1[0]=3;
#将3这个数值赋给数组@int的
第一个元素@int1=(3,2,3,4,5)
$int1[0,1]=[7,8];
#将7赋给数组的第一个元素将8
赋给数组第二个元素
@int1=(7,8,3,4,5)
@int1[0,1]=@int1[1,0];
#将数组前两个元素互换
@int1(8,7,3,4,5)
($int1[0],$int1[1])=($int1[1],$int1[0]);
#同上@int1=(8,7,3,4,5)
@int2=@int1[0,1];
#int2=(8,7)
$int1[5]=6;
#将6赋给数组中第六个元素
@int1=(1,2,3,4,5,6)
- 文章作者: 福州军威计算机技术有限公司
军威网络是福州最专业的电脑维修公司,专业承接福州电脑维修、上门维修、IT外包、企业电脑包年维护、局域网网络布线、网吧承包等相关维修服务。
版权声明：原创作品，允许转载，转载时请务必以超链接形式标明文章原始出处 、作者信息和声明。否则将追究法律责任。
TAG:
|
评论加载中...
|
