您的位置:寻梦网首页编程乐园Perl 编程PERL CGI简介及指令示范
PERL CGI简介及指令示范

数组(Arrays)的用法

  在使用数组的时候要先加上@这个符号,以下是一些范例:
@namel=("tom","mary");

#将"tom","mary"这两个字符串指定给数组 @name1
@name2=@name1;
#此时的@name2=("tom","mary")
@pame3=("john",@name1);
#此时的
(name3=("john","tom","mary")
($one,@name4)=@name3;
#此时的$one="john",而
@name4=("tom"'"mary")
@namel=0;
#此时@name1为一个空数组
@int=(1,3,5,7,9);
$x=@int;

#将一个数组指定给一纯量变量,就会返回数组元
#素的个数,所以此时的$x=5
$x=$#int;

#$#这个变量会返回数组最后一个元素的index
#所以此时$x=4
($x)=@int;
#$x等于数组@int的第一个元素的值,

#所以此时$x=1
$b=$int[0];

#$b等于数组@int的第一个元素,所以$b=1
$C=@int[0];

#$c也是会等于数组@int的第一个元素,所以

#$c=1,因此要呼叫数组中的值有以上两种方法
$int[0]=2;

#将2这个数值指定给数组@int的第一个元素
#此时@int=(2,3,5,7,9);
$int[0,1]=[1,3];

#将1指定给数组@int的第一个元素,且将3指
#定给数组@int的第二个元素的,所以

#此时@int=(1,3,5,7,9);
@int[0,1]=@int[1,0];
#将数组@int的前两个元素交换
#此时@int=(3,1,5,7,9)
($int[0],$int[1])
#也是将数组@int的前两个元素交换
=($int[l],$int[0]);
#此时@int=(1,3,5,7,9);
@data=@int[0,l];
#此时@date=(1,3);
$int[5]=11;

#将11这个数值指定给数组@int中第六个元素
#此时@int=(1,3,5,7,9,11)

上一篇 目录 下一篇