Perl
关注
分享
扫一扫
文章平均质量分 57
AndersJing
这个作者很懒，什么都没留下…
展开
-
Perl语言学习笔记 13 目标操作
1、改变目录chdir "/etc" or die "can't chdir to '/etc'!\n";省略参数会回到用户主目录，与cd效果一样；2、文件名通配my @all_files = glob "*";#不包括以点号开头的文件my @pm_files = glob "*.pm";一次匹配多种模式，用空格隔开：my @files = ".* *";#可以匹配原创 2014-08-20 15:52:26 · 1017 阅读 · 0 评论 -
Perl语言学习笔记 9 正则表达式处理文本
1、替换s/PATTERN/REPLACE/;#返回是否替换成功的布尔值可以使用捕获变量，如：s/(\w)/$1/匹配失败则不做任何处理2、定界符对于没有左右之分的定界符，重复三次即可，如：s///、s###对于有左右之分的定界符，需使用两对，一对包含模式，一对包含替换字符串，这两对可以不一样，如：s{}{}、s[]{}、s3、可选修饰符/g可进行全局替换，原创 2014-08-15 22:47:41 · 1497 阅读 · 0 评论 -
Perl语言学习笔记 11 Perl模块
1、模块来源：随Perl发行版本一起打包、从CPAN下载2、阅读模块文档：perldoc CGI3、安装模块makemaker方式：指定安装目录：Module::build方式：cpan方式：4、File::basename模块5、仅选用模块的部分函数导入引用列表即可10、不引入任何函数 通过全名的方式使用：11、原创 2014-08-17 14:21:16 · 875 阅读 · 0 评论 -
Perl语言学习笔记 10 其他控制结构
1、unless控制结构条件为假时执行，与if相反可以附带else2、Until控制结构条件为假时执行，一直执行到条件为真；3、条件修饰词效果等同于：类似的模式：4、裸块控制结构{ body;body;....}有利于为临时变量圈定有效范围5、elsif子句6、自增、自减同c语言7、for 用法同c语言原创 2014-08-17 10:13:15 · 1104 阅读 · 1 评论 -
Perl语言学习笔记 7 正则表达式
1、正则表达式匹配的是一个模式，只分为匹配和不匹配连原创 2014-08-11 23:16:32 · 785 阅读 · 0 评论 -
Perl语言学习笔记 5 输入与输出
1、判断是否读到文件末尾原创 2014-08-10 16:08:17 · 1004 阅读 · 0 评论 -
Perl语言学习笔记 6 哈希
1、哈希的键是唯一的，值可以重复！2、访问哈希元素$hashname{“$key”};#哈希为大括号，数组为方括号，键为字符串$family_name{"fred"} = "firstd";#给哈希元素赋值3、哈希键支持任意表达式$foo = "na";$family_name{$foo."me"};#获取$family_name{“name"}对应的值4、原创 2014-08-09 22:08:52 · 2588 阅读 · 0 评论 -
Perl语言学习笔记 15 智能匹配与give-when结构
1、智能匹配操作符替代绑定操作符：在哈希中查找某一个键：比较两个数组是否完全相同：查找列表中是否存在某个元素：智能匹配操作符与顺序无关，~~ 左右元素可以互换2、智能操作符优先级3、given语句相当于c语言的switch语句4、given可以测试多个条件，在default前用break，否则会导致default一直执行5、笨拙匹原创 2014-08-21 22:58:59 · 1608 阅读 · 0 评论 -
Perl语言学习笔记 day 2
1、在Perl中，子程序名与变量名属于不同的命名空间，可以使用同一个名字分别命名子程序和变量，但不建议这样使用。2、子程序的定义是全局的，同名的子程序后边的会覆盖掉前边的定义。3、定义子程序sub subProgram{#body}4、调用子程序&subProgram5、所有的子程序都有返回值，默认最后一行的运算结果为返回值。6、子程序未定义参数时，传递的参数默原创 2014-08-07 18:27:16 · 850 阅读 · 0 评论 -
Perl语言学习笔记 day 1
1、PerlPractical Extraction and Report Language：实用摘录与报表语言2、多行注释（1） =需要顶格写= descriptionstatement;=cut（2）末尾的description需要顶格写description; print "Hello,world!\n";description3、数字：原创 2014-08-06 23:28:29 · 1110 阅读 · 0 评论 -
Perl语言学习笔记 14 字符串与排序
1、字符串内用index搜索$where = index($words,$word);##从words里找到首次出现word的位置，下标从0开始，查找失败则返回-1；指定开始搜索的地方：$where = index($words,$word,10);##从10开始往后寻找，包含10搜索子串最后出现的位置：限定返回的最大位置：$where = rindex($words,原创 2014-08-21 09:47:34 · 1261 阅读 · 0 评论 -
Perl语言学习笔记 12 文件测试
1、文件测试操作符原创 2014-08-17 16:54:24 · 891 阅读 · 0 评论