|
珞珈山水BBS →
电脑网络 →
操作系统 →
单文区文章阅读
|
| 单文区文章阅读 [返回] |
|---|
|
发信人: wys0920 (好吃懒做加菲猫), 信区: OS 标 题: 第三课 Perl 变量(2)--数组 发信站: 珞珈山水 ( 2004年08月13日12:28:22 星期五), 站内信件 二、数组 数组是标量数据的有序列表。 数组可以含任意多个元素。最小的数组可以不含元素,而最大的数组可以占满全部 可用内存。 数组实量(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) -- 欢迎大家光临奥运会版面,参与奥运竞猜 http://202.113.16.117/upload/file/1092022471garfieldas.jpg ※ 来源:.珞珈山水 http://bbs.whu.edu.cn ◆ FROM: 222.132.243.214 |
| [返回单文区目录] |
|
|