-
perl中的元字符
所属栏目：[大数据] 日期：2020-12-16 热度：81
? $alerttext1 =~ s/*/ANYCHARACTERS/g; ?my $regex = qr/Q$alertext1E/i;?? #将所有的元字符都预先转义 # Q 在non-word 字符前加上，直到E # E 结束L,E 和Q $regext =~ s/ANYCHARACTERS/.*/g; if($text1 =~ $regex ... Perl中的元字符如下： A??[详细]
-
perl 裸块
所属栏目：[大数据] 日期：2020-12-16 热度：192
裸块的特点：裸块内用 my 声明的变量只在裸块内有效 Eg: my $a = 10; sub fun{ ???????? printf "%sn",$a; ??? } fun(); ##10 { my $a =20; sub naked_fun{ ???????? printf "%sn",$a; } naked_fun(); ? #20 fun(); ? #10 } naked_fun(); ? #20 fun(); ? #[详细]
-
Can't locate Switch.pm in @INC
所属栏目：[大数据] 日期：2020-12-16 热度：63
Can't locate Switch.pm in @INC (@INC contains: external/webkit/WebCore/bindings/scripts /usr/local/lib/perl5 /usr/local/share/perl5 /usr/lib/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib/perl5 /usr/share/perl5 .) at external/webk[详细]
-
perl准确识别IP地址的语句
所属栏目：[大数据] 日期：2020-12-16 热度：64
?((25[0-5])|(2[0-4]d)|(1dd)|([1-9]d)|d)(.((25[0-5])|(2[0-4]d)|(1dd)|([1-9]d)|d)){3}[详细]
-
给Source Insight添加块注释宏、全部选择宏
所属栏目：[大数据] 日期：2020-12-16 热度：153
给Source Insight添加块注释宏、全部选择宏 作者: 奔跑 日期: 2011 年 07 月 19 日 609 views ? 发表评论?(0) ? 查看评论 给SourceInsight添加 “select all”,“CommentBlock”,“UncommentBlock”? 功能 步骤如下： 1)?????? 使用覆盖默认 utils.em 的方法[详细]
-
perl 的测试框架 (Test::Base)
所属栏目：[大数据] 日期：2020-12-16 热度：174
Test::Base是什么？用官方的说法是“数据驱动的测试”。Test::Base是一个测试框架，只要给它提供测试数据，它就能自动进行单元测试，省却了手工编写测试程序的麻烦。 可能有人用过Test::More模块进行自动测试，那么我推荐你使用Test::Base。Test::Base 与Tes[详细]
-
安装atk包make时出错/usr/bin/env: perl: No such file or direc
所属栏目：[大数据] 日期：2020-12-16 热度：165
/usr/bin/env: perl: No such file or directory 出现这种错误 可能是没有安装prel[详细]
-
tr和s的区别
所属栏目：[大数据] 日期：2020-12-16 热度：183
有段时间对perl中的tr///和s///的作用有点混淆，通过做实验终于明白它们之间的细微差别，在此一记。 $var='abcda'; $var =~ s/a/11/g; 最终var值为11bcd11 而$var =~ tr/a/11/;后 $var值为1bcd1； 以上事例说明s替换可以将一个字符(比如a)换成两个字符(11),[详细]
-
perl 删除某个文件
所属栏目：[大数据] 日期：2020-12-16 热度：62
? [root@bogon?gongzuo]#?cat?-n?search.pl? ?????1??#!usr/bin/perl? ?????2??use??strict;? ?????3??use?warnings;? ?????4??my?$ dir ?=? "/home/gongzuo" ;? ?????5??opendir?DH,?$dir?or?die?"Cannot?open?$dir:?$!";? ?????6??foreach?my?$file?(?read[详细]
-
perl 正则表达式
所属栏目：[大数据] 日期：2020-12-16 热度：95
周末花两天时间写的一个介绍perl 正则表达式的 ppt 分享出来. 内容需要有点点正则基础才能看懂. 见附件 欢迎交流拍砖.[详细]
-
perl 转汉字到拼音
所属栏目：[大数据] 日期：2020-12-16 热度：138
pm link?: search.cpan.org/~fayland/Lingua-Han-PinYin-0.15/lib/Lingua/Han/PinYin.pm #!/usr/bin/perl?-w ? ? use?Lingua::Han::PinYin(); ? ? sub?getpinyin{ ? my?@value?=?@_; ? my?$pinyin?=? '' ; ? ???? for ?my?$ out ?(0?..?$#value){ ? ???????$[详细]
-
Perl获取连接本机的外部IP信息。
所属栏目：[大数据] 日期：2020-12-16 热度：196
? 说明： 通过读取"netstat -p tcp"命令的输出，提取Foreign Address部分的数据，并对同一IP多重连接进行计数。 优点： 相对于netstat命令的输出，可以更直观的发现异常的外部连接IP。 ???????????????????????????????????????????????????????????????????[详细]
-
Learning Perl
所属栏目：[大数据] 日期：2020-12-16 热度：107
Perl 最初的设计者为拉里·沃尔（Larry Wall），它于1987年12月18日发表。Perl借取了C、sed、awk、shell scripting以及很多其他程序语言的特性。Perl 一般被称为“实用报表提取语言（Practical Extraction and Report Language），一般而言，首字母大写的“P[详细]
-
perl安装模块
所属栏目：[大数据] 日期：2020-12-16 热度：165
各种平台下Perl模块的安装方法 来源:http://www.linuxforum.net David lee (2001-04-21 18:11:53) Perl到了第五版增加了模块的概念，用来提供面向对象编程的能力。这是Perl语言发展史上 ? 的一个里程碑。此后，广大自由软件爱好者开发了大量功能强大、构思精[详细]
-
在Perl中使用Net::SMTP_auth发送邮件 .
所属栏目：[大数据] 日期：2020-12-16 热度：56
1， 在不需要认证的smtp服务器上发送邮件 #!/usr/bin/perl -w ??use Net::SMTP; ??$smtp = Net::SMTP-new($mail_server);? ? #邮件服务器地址 ??$smtp-mail($send_user);? ?? ?? ?? ?? ???#发件人 ??$smtp-to($recv_user);? ?? ?? ?? ?? ?? ? #收件人 ??$smt[详细]
-
perl 学习资料
所属栏目：[大数据] 日期：2020-12-16 热度：114
转载自：http://club.topsage.com/thread-464914-1-3.html 关于学习Perl Perl是一门很有用的语言，可以用它来做很多事。然而，它也仅是一门语言，掌握了Perl，你只是掌握了Computer领域的一小块知识。在学习Perl前，请明确你的学习目的，并采用正确的学习方[详细]
-
Perl批量杀升腾终端绑定程序进程，解决CPU占用率100％问题。
所属栏目：[大数据] 日期：2020-12-16 热度：145
需求: 同事反映服务器每当下午下班时就出现终端登录难、业务办理长时间无响应。 ??? 经查,升腾终端绑定程序与每个终端都有大量无效连接 （Perl获取连接本机的外部IP信息） ，即使，终端离线占用的资源依然不释放，下次连接时又重新创建新连接，重复。直至耗[详细]
-
perl CGI模块安装
所属栏目：[大数据] 日期：2020-12-16 热度：191
安装twiki时，遇到错误提示?Can't locate CGI.pm in @INC CGI模块没有正确安装 CGI不包含在Perl的标准发行版中 CGI.pm,for all of its useful and amazing features,is just one of the many terrific Perl 5 modules that isn't included with the standard[详细]
-
如何利用 Perl 解析 HTML
所属栏目：[大数据] 日期：2020-12-16 热度：114
参考资料 1. HTML::TokeParser 2. perlLWP 综述 3. Perl 的 html 解析模块[详细]
-
Perl associative array (hash) and array
所属栏目：[大数据] 日期：2020-12-16 热度：170
refer to :?http://www.thegeekstuff.com/2011/09/perl-complex-data-structures/ and?http://www.perlmonks.org/?node_id=1978 Perl developers should understand how to use complex data structures effectively. In this article,I picked the top 5 us[详细]
-
Perl 脚本中单元测试自动化浅析
所属栏目：[大数据] 日期：2020-12-16 热度：185
Perl 脚本中单元测试自动化浅析 来源：http://www.ibm.com/developerworks/cn/opensource/os-cn-perl-unittesting/?cmp=dwsklcpb=dwct=dwconcr=cn_CSDNccy=cn 刘华婷,software engineer,IBM 简介： 随着敏捷开发模式的流行，单元测试的自动化也显得尤其重要[详细]
-
Perl 最佳实践(节选) --- 01
所属栏目：[大数据] 日期：2020-12-16 热度：61
写在篇首： -------------------------------------------------------------------------------------- ??????? 此系列是 Perl Best Practices 的学习节选！ ??????? 有兴趣的朋友可以使用邮箱和我沟通！（非常欢迎你的交流） ??????? 我的邮箱: veic_2005#[详细]
-
今天终于把字串整理的程序完成了，明天开始清明节放假咯
所属栏目：[大数据] 日期：2020-12-16 热度：182
将res文件夹下面的所有*.r文件的字串名与中文翻译提取出来，每个.r文件对应一张sheet，本文件中的翻译存放在本sheet中。代码很乱，但是很不想改了 经理总是叫我整理字符串，这么多的字串手动拷贝肯定是不行的，VBA也不熟，每次编程都要之前的模板拿来也折腾[详细]
-
Perl 最佳实践(节选) --- 02
所属栏目：[大数据] 日期：2020-12-16 热度：88
? 第二章：代码部署 ? ? 零零壹. 以 KR 风格表示大括号和小括号。 ? 即： my @name = ( ?????? ‘Damian’, ?????? ‘Matthew’ ); ? for my $name (@names) { ?????? formy $word ( anagrams_of(lc $name) ) { ????????????? print“$worn”; ?????? } } ?[详细]
-
Perl 最佳实践(节选) --- 03
所属栏目：[大数据] 日期：2020-12-16 热度：145
? ? 第三章：命名惯例 ? 零贰叁. 构成标示符时要使用文法模板。 ? l????????变量以名词命名，前面不加或再加上多个形容词： ?????? variable → [adjective _ ]* noun l????????hash和数组： ?????? look-variable → [adjective _ ]* noun preposition ? ?[详细]
