|
| |
|
指令： |
sort |
|
语法： |
sort(@array) |
|
说明： |
将数组array中的元素从小到大排序，如果由大到小排序的话，就要加上reverse这个函数 |
|
范例： |
@array=("b","c","a");
@array=sort(@array);
print @array; #输出a,b,c请注意如果使用sort函数进行数值排序的时候，会出错。因为perl将数字当做字符串来处理的。如果要排序，则应该使用这样的方法：
@number=(sort{$a<=>$b}@number); |
|
指令： |
length |
|
语法： |
length($string) |
|
说明： |
求出一字符串$string的bytes值 |
|
范例： |
$string="perl";
$size=length($sting); #此时$size=4
|
|
指令： |
substr |
|
语法： |
substr($string,offset,length)
其中offset代表开始字符的位置；length代表引用的字符串长度，如果省略length则代表整个字符串的长度。而offset是负值的话，就会从字符串右边取出指定的字符串。 |
|
说明： |
在一个字符串$sting中取出想要的字符串 |
|
范例： |
$x=substr("testing",2,2) $x="st";
$x=substr("testing",2) $x="string";
$x=substr("testing",-2,2)$x="in"; |
|
指令： |
index |
|
语法： |
index($string,$substring,position)
其中$substring是指要寻找的字符；position代表从哪一个位置开始找起，如省略position的话就从头开始找起。 |
|
说明： |
返回要找寻的字符在一字符串$stirng中的位置，如果在字符串中找不到字符的话，则会返回-1这个值。 |
|
范例： |
$x=index("testing","t"); $x=0; |
|
指令： |
push |
|
语法： |
push(@array,$string) |
|
说明： |
在数组array的最后一个元素后附加新的元素$string到数组array中 |
|
范例： |
@array=("one","two");
push(@array,"three"); |
|
指令： |
unshift |
|
语法： |
unshift(@array,$string) |
|
说明： |
在数组array的第一个元素前附加新的元素 |
|
范例： |
@array=("two","three");
unshift(@array,"one"); |
|
指令： |
shift |
|
语法： |
shift(@array) |
|
说明： |
将数组array的第一个元素删除并返回删除的元素值 |
|
范例： |
@array=("three","one","two");
$mr=shift($array); |
|
指令： |
join |
|
语法： |
join($string,@array) |
|
说明： |
在一数组@array的元素之间加上一指定的字符$string，并将结果返回 |
|
范例： |
@array=("one","two","three");
$totle=join(":",@array); $totle="one:two:three"; |
回CGI教程 回perl目录 |
