Y
ytbszl80
指令:keys
语法:keys(%array)
说明:取出关联数组%array中全部的key.
范例:%name=(1,"one",2,"two");@list=key(%name);#此时@list=(1,2);
指令:values
语法:values(%array)
说明:取出关联数组%array中的全部value.
指令:reverse
语法:reverse(@array)
说明:将数组中的元素倒序.
指令:sort
语法:sort(@array)
说明:将数组@array中的元素由小到大排序,如果要由大到小的话,就要加上reverse这个函数.
eg:@array=("b","c","a");
@array=sort(@array); #此时@array=("a","b","c");
@array=(reverse sort@array);#此时@array=("c","b","a");
注意:@number=(10,3,20);
@number=sort(@number);#此时@number=(10,20,3);
由上可知如果用sort来对数值进行排序时,会产生错误,因此对数值进行排序时要用以下的方法:
@number=(sort($a<=>$b)@number);
指令:length
语法:length($string)
说明:求出一个字符串$string的bytes值.
范例:$string="perl";@size=length($string);#此时$size=4;
指令:substr
语法:substr($string,offest,length)
其中offset代表其实字符的位置,length代表引用的字符串长度,如省略length的话代表从起始值到字符串的最后一个字符长度.而offest如果是负值的话,就会从字符串的右边开始取出指定的字符串.
说明:在一字符串中取出子串.
eg:$x=substr("testing",2,2);#此时$x="st";
$x=substr("testing",2); #此时$x="sting";
$x=substr("testing",-2,2);#此时$x="in";
语法:keys(%array)
说明:取出关联数组%array中全部的key.
范例:%name=(1,"one",2,"two");@list=key(%name);#此时@list=(1,2);
指令:values
语法:values(%array)
说明:取出关联数组%array中的全部value.
指令:reverse
语法:reverse(@array)
说明:将数组中的元素倒序.
指令:sort
语法:sort(@array)
说明:将数组@array中的元素由小到大排序,如果要由大到小的话,就要加上reverse这个函数.
eg:@array=("b","c","a");
@array=sort(@array); #此时@array=("a","b","c");
@array=(reverse sort@array);#此时@array=("c","b","a");
注意:@number=(10,3,20);
@number=sort(@number);#此时@number=(10,20,3);
由上可知如果用sort来对数值进行排序时,会产生错误,因此对数值进行排序时要用以下的方法:
@number=(sort($a<=>$b)@number);
指令:length
语法:length($string)
说明:求出一个字符串$string的bytes值.
范例:$string="perl";@size=length($string);#此时$size=4;
指令:substr
语法:substr($string,offest,length)
其中offset代表其实字符的位置,length代表引用的字符串长度,如省略length的话代表从起始值到字符串的最后一个字符长度.而offest如果是负值的话,就会从字符串的右边开始取出指定的字符串.
说明:在一字符串中取出子串.
eg:$x=substr("testing",2,2);#此时$x="st";
$x=substr("testing",2); #此时$x="sting";
$x=substr("testing",-2,2);#此时$x="in";