语法：values(%array) 

说明：取出关联数组%ARRAY中全部的value。 

示例：%NAMES=(1,"mike",2,"michael"); @readval=values(%NAMES); #这时@readval=

("mike","michael"); 

指令：reverse 

语法：reverse(@array) 

说明：将数组@array中的元素由后到前重新排列。 

示例：@back=("A","B","C","D","E"); @back=reverse(@back); #这时@back=("E","D","C","B","A"); 

指令：sort 

语法：sort(@array) 

说明：将数组中的元素由小到大排序，如果要由大到小排序的话，要加上reverse这个函数。 

示例： 

@abc=("d","b","c","a"); @abc=sort(@abc); #这时@abc=("a","b","c","d"); 

@abc=(reverse sort@abc); #这时@abc=("d","c","b","a"); 这个语法也可以写成@abc=(reverse sort

(@abc)); 

@number=(5,2,10); @number=sort(@number); 上面示例用sort函数来排序数值的时，会出差错，因此要用

下面到下面这一句。 @number=(sort{$a<=>$b}@number); #这时@number=(2,5,10); 

指令：length 

语法：length($string) 

说明：求出字符串$string的字节(bytes)值。 

示例：$string="Perl5"; $size=length($string); #这时$size=5; 

指令：substr 

语法：substr($string,offset,length) offset代表起始字符的位置,length代表引用的字符串长度，如果

省略length则代表从起始值到字符串的最后一个字符长度。而offset如果是负值的话，就会从字符串右边开

始指定字符。 

示例： 

$s=substr("perl5",2,2); #这时$s="rl"; 

$s=substr("perl5",2); #这时$s="rl5"; 

$s=substr("perl5",-2,2); #这时$s="er"; 

指令：index 

语法：index($string,$substring,position) $substring是要寻找的字符；position代表从哪一个位置开

始寻找，假如省略position就从头开始找起。 

说明：返回所要找寻的字符在一字符串$string中的位置，如果在字符串中找不到字符的话，则会返回-1这

个 值。 

3