![](https://img-blog.csdnimg.cn/20201014180756724.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Perl学习
文章平均质量分 67
latalata
IT民工
展开
-
Perl中的正则表达式(转摘)
9 Perl 中的正则表达式正则表达式的三种形式 正则表达式中的常用模式 正则表达式的 8 大原则 正则表达式是 Perl 语言的一大特色,也是 Perl 程序中的一点难点,不过如果大家能够很好的掌握他,就可以轻易地用正则表达式来完成字符串处理的任务,当然在 CGI 程序设计中就更能得心应手了。下面我们列出一些正则表达式书写时的一些基本语法转载 2009-01-02 15:39:00 · 832 阅读 · 0 评论 -
Perl中递归遍历文件夹,寻找包含某个字符串的文件
#!C:/perl/binuse strict;use warnings;our %params = ();&getParams();die "lack params error/n" if(!exists($params{"dir"}) || !exists($params{"strpattern"}));my $SYSTEM;my $separator;my $file;my $recursi原创 2009-01-04 15:07:00 · 3048 阅读 · 0 评论 -
Perl中的词法变量
(my)词法变量 Perl中的词法变量可以应用在任何的块和子例程中; 被my 修饰的词法变量对于所属块而言是私有的; 如果变量的定义未出现在任何块中,则该变量对于整个程序文件而言是私有的. my操作符可以用来修饰标量变量: 如在test.pl中: #!/user/bin/perl use strict; use warnings; my $num1 = 5;原创 2009-01-05 10:33:00 · 2002 阅读 · 0 评论 -
Perl中列表实用工具集的使用
List::Util 列表实用的工具集.摘要:use List::Util qw(first max maxstr min minstr reduce shuffle sum);示例:1:first 返回列表中第一个满足条件的元素, 若不存在, 则返回undefined:如 $fed = first { defined($_) } @list; #list中第一个defined的元素 $原创 2009-01-16 09:55:00 · 570 阅读 · 0 评论 -
Perl中的变量(1)
变量变量(variable)就是某个容器的名称, 里面可以存储一个或者多个值.变量的名称在程序运行期间是保持不变的, 但通常变量的值是可以发生改变的.标量变量Perl中的标量(Scalar)用来指代单个事物,譬如一个数值或者一个字符串.标量可以用一个标量变量来存储,也可以读取自或写出到文件和设备中.在Perl中, 标量变量的名称是以美元符号($)开头, 后面接着"Perl 标识符":一个字母或下划翻译 2008-12-19 10:20:00 · 1031 阅读 · 0 评论 -
一个Perl文本处理实例
假设存在file1, file2两个文本文件, 文件每行格式为:| .* | .*;要求:求出所有在file2文件中出现的行, 且仅保留双"|"之间的内容。如: 若存在 |adfdf| dofijaosdjioaf 于file2, file1中不存在该项,则该返回 |adfdf|参考例程:#!/usr/bin/perluse strict;use warnings;die "lack compar原创 2008-12-24 17:19:00 · 3721 阅读 · 0 评论