首页 > 代码库 > Perl语言学习笔记 14 字符串与排序
Perl语言学习笔记 14 字符串与排序
1、字符串内用index搜索
$where = index($words,$word);##从words里找到首次出现word的位置,下标从0开始,查找失败则返回-1;
指定开始搜索的地方:$where = index($words,$word,10);##从10开始往后寻找,包含10
搜索子串最后出现的位置:
限定返回的最大位置:$where = rindex($words,$word,10);##只搜索下标为10以前的字符。
2、处理子串
substr参数:依次为:字符串、起始下标、要截取的长度(超出实际长度会以实际长度为准)
省略第三个参数会一直取到字符串结尾:
字符串的起始位置可以为负值,表示从字符串结尾开始倒数:
substr可以和index联合使用,比正则表达式效率高:
假如字符串是一个变量,可以修改字符串被选取的部分,子串的长度不需要与被替代的字符串长度相同:
用绑定操作符对字符串的某一部分进行操作:
另外一种替换方式,返回值为替换前的子串:
3、用sprintf格式化数据
与printf效果相同,但是返回处理好的字符串,而不打印:
处理财务数据例子:
第二行主要在执行条件表达式,而循环主体只是一个占位作用,可以替换为:
4、高级排序
首先,建立自己的排序子程序:
然后,调用:
飞碟操作符(<=>)比较两个数字并返回0、1、-1:
cmp操作符,比较字符串大小:
内嵌子程序:
递减顺序排列:
5、哈希按值排序:
按多值排序:
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。