Perl程序设计中常用的函数之4
发表时间:2024-06-11 来源:明辉站整理相关软件相关文章人气:
[摘要]指令:length 语法:length($string) 说明:求出字符串$string的字节(bytes)值。 示例:$string="Perl5"; $size=length($string); -----------------------#这时$size=5; 指令:s...
指令: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这个 值。
示例:
$s=index("perl5","p"); ----------------------#这时$s=0
$s=index("perl5","l",2); -------------------- #这时$s=3
$s=index("perl5","perl"); -------------------#这时$s=-1
指令:push
语法:push(@array,$string)
说明:
在数组@array的最后附加新的元素 ($string)到数组@array中。
示例:
@array=("one","two");
push(@array,"three"); ----------------------#这时$@array=("one","two","three")
指令:pop
语法:pop(@array)
说明:将数组(@array)的最后一个元素删除,并将删除的元素返回。
示例:
@array=("one","two");
$rm=pop(@array);---------------------- #这时@array=("one");而$rm="two";
指令:unshift
语法:unshift(@array,$string)
说明:在数组@array的第一个元素前附加新的元素$string到数组@array中。
示例:
@array=("one","two");
unshift(@array,"three"); -----------------#这时@array=("three","one","two")