-
Perl 练习2
所属栏目：[大数据] 日期：2020-12-16 热度：174
#!/usr/bin/perl -wsub add{$num+=1;print "now num is $num n";}add;add;add; #!/usr/bin/perl -w#$arr1[0]="zz";#$arr1[1]="aa";#$arr1[2]="bb";#$arr1[99]="cc";#$startIndex=0;#$endIndex=$#arr1;#@names=qw#zhanzhao wangwu qinfang#;=this is a descr[详细]
-
perl 文件操作
所属栏目：[大数据] 日期：2020-12-16 热度：199
打开、关闭文件 ?? open (filevar,filename) ??? filevar为文件句柄，或者说是程序中用来代表某文件的代号 ??? filename为文件名，其路径可为相对路径，亦可为绝对路径 open(FILE1,"file1"); open(FILE1,"/u/jqpublic/file1"); ?? 打开文件时必须决定访问模[详细]
-
perl中的哈希表
所属栏目：[大数据] 日期：2020-12-16 热度：121
参考：http://www.voidcn.com/article/p-fekrnkmz-yp.html 哈希表的定义： ??? %a = (); ??? 定义哈希表%a,并初始化为空。 ??? %a = {"a"=1,"b"=2}; ??? 定义哈希表%a,%a中有两个键(key)和键值(value)的对应关系。 哈希表的访问： ??? $a{"a"}; ??? 哈希表的[详细]
-
「Perl/Tk」一个数据库期末设计的前台
所属栏目：[大数据] 日期：2020-12-16 热度：50
数据库的期末设计弄完了，Perl/Tk 做的前台，前台加数据库花了一天多的时间。代码量刚到4 位数，愁人的还是数据库满足三大范式的设计，也不知道老师会不会怪自己用perl 做界面，Tk 库毕竟太古老了写出来的窗体有点90 年代的样子。相对于这些数据库的后台设计[详细]
-
Perl中DBI和DBD-mysql模块的安装
所属栏目：[大数据] 日期：2020-12-16 热度：108
一、DBI的安装 wget?http://www.cpan.org/modules/by-module/DBD/DBI-1.604.tar.gz tar -zxvf DBI-1.604.tar.gz cd DBI-1.604 perl Makefile.PL make make test make install 二、DBD的安装? yum -y intall ? mysql-devel 注意mysql的环境变量，若没有则用[详细]
-
Perl脚本语言
所属栏目：[大数据] 日期：2020-12-16 热度：69
连接：http://zh.wikipedia.org/wiki/Perl#.E6.97.A9.E6.9C.9F.E7.89.88.E6.9C.AC Perl 是一种高级、通用、直译式、动态的程序语言。最初设计者拉里·沃尔（ Larry Wall ）为了让在UNIX上进行报表处理的工作变得更方便，决定开发一个通用的脚本语言，而在198[详细]
-
perl 自动发邮件
所属栏目：[大数据] 日期：2020-12-16 热度：186
perl脚本： #!/usr/bin/perl use Net::SMTP; use MIME::Base64; ################ # 自动签到脚本 # ################ $host = '10.182.131.153'; #SMTP服务器地址 ########################### # # $host: smtp服务器 # $auth: 邮件账户 # $password: 邮件[详细]
-
mmm_agent_navy2.conf is world readable! at /usr/share/perl5/
所属栏目：[大数据] 日期：2020-12-16 热度：60
这几天在研究mysql-mmm架构，我们公司的数据库都是一台服务器部署多个实例，所以也想把mmm弄成多实例的，配置文件、启动脚本文件撰写好，启动报错： [root@db2 mysql-mmm]# /etc/init.d/mysql-mmm-agent-navy2 startStarting MMM Agent Daemon: Configuratio[详细]
-
从细节处提升Perl性能
所属栏目：[大数据] 日期：2020-12-16 热度：190
从细节处提升Perl性能 下面所写的各点都是我从其他地方找过来了。整理一下希望对各位有所帮助。 变量和常量 1,提升Perl性能时尽量减少数学表达式的计算，如： $day=24*60*60;#不好 $day=86400;#better 2,使用vec函数而不是变量来存放非常小的数字。 print 1,[详细]
-
perl的USE和require区别
所属栏目：[大数据] 日期：2020-12-16 热度：119
不同： 1） 区别在于USE是在当前默认的@INC里面去寻找,一旦模块不在@INC中的话,用USE是不可以引入的，但是require可以指定路径； 2）use引入的名称不需要后缀名,默认找.PM文件，而require需要后缀名，且后缀名可以为.PM或.PL； 实例：c:perl目录下3个文件如[详细]
-
浅谈Perl正则表达式
所属栏目：[大数据] 日期：2020-12-16 热度：187
一、简介 Perl正则表达式中模式指在字符串中寻找的特定序列的字符，由反斜线包含：/def/即Perl正则表达式中模式def。其用法如结合函数split将字符串用某Perl正则表达式中模式分成多个单词：@array=split(//,$line); 二、匹配操作符=~、!~ =~检验匹配是否成功[详细]
-
perl 参数传递
所属栏目：[大数据] 日期：2020-12-16 热度：55
原文：http://www.voidcn.com/article/p-qaglbnqx-on.html ? Getopt::Std模块的使用： 初始设置：? 在程序中加入如下代码： use Getopt::Std; use vars qw($opt_d $opt_f $opt_p); getopts('d:f:p'); (注意上两行的参数要对应) [ 解释一下"d:f:p"，d和f后有[详细]
-
Perl脚本注释：单行注释和多行注释
所属栏目：[大数据] 日期：2020-12-16 热度：56
Perl中的程序注释：单行注释和多行注释 转自： http://www.cnblogs.com/xianghang123/archive/2011/07/07/2099898.html （一）单行注释： ? 以#开头的行都被perl认为是注释 。但是有一个 例外 ，perl程序的第一行是#开头的，他指定了perl程序的解释器。 例如[详细]
-
perl系列：Perl默认的内部变量
所属栏目：[大数据] 日期：2020-12-16 热度：166
转自：http://hubeihuyanwei.blog.163.com/blog/static/282052842009112310827699/ $- 当前页可打印的行数,属于Perl格式系统的一部分 $! 根据上下文内容返回错误号或者错误串 $” 列表分隔符 $# 打印数字时默认的数字输出格式 $$ Perl解释器的进程ID $% 当前[详细]
-
[转]perl的INC设置
所属栏目：[大数据] 日期：2020-12-16 热度：65
perl中的INC变量中包含了所有的perl module的查找路径。 可以使用perl -V 来查看INC的值。 ? 1）默认地INC如下： ? @INC: ? ? C:/Perl/site/lib ? ? C:/Perl/lib ? ? . 2）设置环境变量PERL5LIB来增加到INC，例如： ? set perl5lib=c:perllibs ? 在设置perl[详细]
-
高阶Perl
所属栏目：[大数据] 日期：2020-12-16 热度：200
高阶Perl ? ? ? 本书是 Perl全球社区公认的经典著作，是资深 Perl技术专家（核心贡献者之一）数 十年工作经验 的结晶，Perl 6设计者之一 Conway亲自作序推荐。 对其内容详细阅读[详细]
-
perl编程总结
所属栏目：[大数据] 日期：2020-12-16 热度：125
perl主要有三种数据类型，一个是$保存的变量，一个是@保存的数组，一个是%保存的哈希数组。 perl中的变量$ $保存的变量在PERL中是不区分任何类型的，也就是说没有数据类型的概念。perl会根据上下语境自动识别。例如 my $value = 10;perl会当做变量来识别。pe[详细]
-
perl读写文件
所属栏目：[大数据] 日期：2020-12-16 热度：114
1，从命令行读取文件或者文件夹 2，支持无限多个文件或者文件夹参数，不分顺序 3，可以识别非法文件和文件夹，退出并提示 组合一： FileDirHelper.pm #!/usr/local/bin/perl#Ljlpackage FileDirHelper;my ($size,$dircnt,$filecnt) = (0,0);my @files;my @Al[详细]
-
PERL----名符其实的“胶水语言”
所属栏目：[大数据] 日期：2020-12-16 热度：99
JAVA代码部分： BufferedReader? br? =? null ;? ? try ? {? ? ? ? ? ? br? =? new ? BufferedReader( new ? FileReader( "test.txt" ));? ? ? ? ? ? String? line? =? br.readLine();? ? ? ? ? ? while ? ( null ? !=? line)? {? ? ? ? ? ? ? ? ? ? if ? (l[详细]
-
perl EXCEL处理
所属栏目：[大数据] 日期：2020-12-16 热度：66
package?GetExcelData; use?Win32::OLE;???#导入win32?OLE包 use?Win32::OLE::Const?"Microsoft?Excel"; use?Cwd;#获取本地路径模块 #数据类型如下所示 #$EXCEL-$sheet-{@rowdata,@coulmndata} #@rowdata={@row1,@row2,....}; #@rowdata={@coulmndata1,@coul[详细]
-
Perl 的特殊符号
所属栏目：[大数据] 日期：2020-12-16 热度：65
Perl的特殊符号 ? @?????? 数组 ? ? ? ? ? ? ? ? ? ? ? ? ?? $x{}?? x名字前面是美元符号($),后面是花括号({}),则其为 hash 元素 %?????? 要引用整个 hash,使用百分号(“ )作为前缀。前面几页中使用的 hash 的名字为%family_name。 $!????? 系统产生的一些可[详细]
-
PERL 文本处理
所属栏目：[大数据] 日期：2020-12-16 热度：99
package?FileOperate; sub?new { ?my?$class?=?shift; ?#一个空的引用 ?my?$ref?=?{}; ?#将引用和对象绑定 ?bless($ref,$class); ?#返回引用 ?return?$ref;? } #获取一个目录下的所有文件名字 sub?ListFile{ ?????????my?$ref?=?shift; ????????my?$dir?=?sh[详细]
-
PERL 正则表达式详细说明
所属栏目：[大数据] 日期：2020-12-16 热度：136
PERL里正则表达式的简介? 一、简介? 二、匹配操作符? 三、模式中的特殊字符? 1、字符+? 2、字符 []和[^]? 3、字符 *和?? 4、转义字符? 5、匹配任意字母或数字? 6、锚模式? 7、模式中的变量替换? 8、字符范围转义前缀? 9、匹配任意字符? 10、匹配指定数目的字[详细]
-
[Perl] File::Basename用法
所属栏目：[大数据] 日期：2020-12-16 热度：96
【0710】[perl] File::Basename用法 自从开始生物信息。。接触了 perl ，总是无比蛋疼。 这次，小结一下 File::Basename 用法。 我觉得，学习 perl 最好是看官网的指导，然后实践就好。 附上原文。 http://perldoc.perl.org/File/Basename.html 我觉得主要用[详细]
-
使用 Perl 脚本做文件内容替换
所属栏目：[大数据] 日期：2020-12-16 热度：130
本人是Perl语言初学者，仅仅是读完?Perl语言入门(第四版).pdf，工作中写过几个小脚本。 感觉Perl语言处理文本任务确实很强大，准备写些个笔记用于知识积累。 最近工作中需要更新很多个文件，每个文件只需要更新字符串资源的字符串 id ，文件是 xml 格式的（P[详细]
