-
Perl 前缀树实现
所属栏目:[大数据] 日期:2020-12-16 热度:102
前缀树,用来处理大量字符串的查找、排序,也称为字典树,可以代替hash table。 http://en.wikipedia.org/wiki/Trie 以下翻译自Wikipedia: The following are the main advantages of tries over?binary search trees?(BSTs): Looking up keys is faster. L[详细]
-
localtime函数可以实现获取时间信息
所属栏目:[大数据] 日期:2020-12-16 热度:132
localtime函数,根据它所在的上下文,可以用两种完全不同的方法来运行。在标量上下文中,localtime函数返回一个格式化很好的当前时间字符串。例如,print scalar (localtime)这个代码,它输出的结果将类似于Thu Sep 16 23:00:06 1999。在列表上下文中,local[详细]
-
understand学习
所属栏目:[大数据] 日期:2020-12-16 热度:104
Understand 为程序源代码分析提供很大的帮助。 它可以进行代码一些量的度量,还能够画出代码内部的调用关系图,可以很直观地看出内部结构。 ? Understand 安装包里面有 understand 和 understand_api 两个文件,先学习了 understand 的一些基本用法,很简单[详细]
-
perl 导出导入 excel
所属栏目:[大数据] 日期:2020-12-16 热度:183
记下来自己的一个样例: 在 2003中测试过了OK ??? use utf8;use Win32::OLE qw(in with);use Win32::OLE::Variant;use Win32::OLE::Const "Microsoft Excel";use Encode;my $Encode = "GBK";my $Columns = [{col='A',title='name',value_field='a'},{col='B'[详细]
-
Perl环境的搭建
所属栏目:[大数据] 日期:2020-12-16 热度:145
Perl环境的搭建 Perl在windowsXP中的安装 (1)下载windows的安装包,下载地址: http://www.activestate.com/activeperl/downloads (2)安装 (3)安装完成后,在运行--"cmd"--"perl -v"可以查看到Perl的版本号 ? Perl在Linux中的安装 因为Perl是Linux系统[详细]
-
用perl访问Oracle
所属栏目:[大数据] 日期:2020-12-16 热度:189
1)在安装CPAN前,需要首先安装Oracle-Client。 2)安装好Oracle-Client后,要配置tnsnames.ora。用sqlplus测试一下确实可以访问到这个Oracle实例。 3)安装好DBI和DBD::Oracle后,perl访问Oracle的代码如下: #!/usr/bin/perl ? ? use?DBI; ? ? $dbh?=?DB[详细]
-
perl 读写xml举例
所属栏目:[大数据] 日期:2020-12-16 热度:54
1. xml脚本内容如下: CONFIGLOADITEM FILENAME="Drop_Cause.csv" TABLENAME="PS_CALLDROP_CAUSE"/ITEM FILENAME="ECIORange_AVG.csv" TABLENAME="ECIO_RANGE"/ITEM FILENAME="FX_ALARM.csv" TABLENAME="FX_ALRAM"/ITEM FILENAME="Resource_congestion.csv"[详细]
-
Perl 前缀树实现(2)
所属栏目:[大数据] 日期:2020-12-16 热度:173
在前一篇?Perl 前缀树实现?中用hash table的方法实现了前缀树,算法导论中用数组来实现,方法基本相同,下边用链表的方法来实现,遍历算法可以用到其他树结构遍历。 代码: use Data::Dumper;# 默认只支持字符串的输入sub trie_tree{ my $root = { char=unde[详细]
-
Perl 内部结构详解 -- PerlGuts Illustrated
所属栏目:[大数据] 日期:2020-12-16 热度:117
之前想看一下Perl的实现,无意中搜到了这篇文章,对Perl内部类型的结构解释的很清晰,推荐感兴趣的都仔细看一下,想优化的时候做到心中有数。 接下来的几篇blog将翻译这篇文档中常见类型的部分,做个记录,加深印象,同时也方便大家阅读理解。 PerlGuts Illu[详细]
-
Perl 获取shell命令的执行结果
所属栏目:[大数据] 日期:2020-12-16 热度:81
方法有很多: ? 1. 重定向shell的标准输出或标准错误输出到某临时文件,然后再从临时文件中读出执行结果。 ? 这个办法的好处是可以把标准输出和标准错误输出分开保存! ? 2. my $res = `ls`; ? 这种方法很直接,也很想shell ? 3. open( my $fh,"ls |") or die[详细]
-
perl中的字符串和数值
所属栏目:[大数据] 日期:2020-12-16 热度:117
$string = "11"; $number = 22; $result = $string + $number; # $result = 33 perl 中字符串和数值可以互相转换,但是只是十进制的字符串。 对于字串中有非十进制字符的,从左边到第一个非十进制字符的字符串将被 转换: $result = "12a34" +1; # $result =[详细]
-
Perl inc设置
所属栏目:[大数据] 日期:2020-12-16 热度:180
perl语言中通过INC变量包含了所有的perl module查找路径。 可以使用perl -V 来查看INC的值。 默认地INC如下: ?? C:/Perl/site/lib ?? C:/Perl/lib ? 通过设置环境变量PERL5LIB来增加到INC: ? set perl5lib=c:perllibs ? 在perl程序中修改INC: perl -w pu[详细]
-
脚本语言perl,shell,python学习论坛及网站
所属栏目:[大数据] 日期:2020-12-16 热度:184
python: http://bbs.chinaunix.net/? ? ?xuguoying123456 ?xgy4876[详细]
-
监测Squid日志的五种方法
所属栏目:[大数据] 日期:2020-12-16 热度:55
Squid是Unix、Linux环境下一款优秀的代理服务器软件,本文叙述了Squid代理日志的五种监测方法,五种方法各有重点,可根据需要进行选择使用。 1 使用命令行 访问时间 持续时间 客户IP 采用协议 传输字节 访问方式 服务IP 如果我们仅仅需要查看某一个字段,可[详细]
-
perl 基本命令[hash表]
所属栏目:[大数据] 日期:2020-12-16 热度:152
1. perl? hash表的简介: http://www.cnblogs.com/nwf5d/archive/2011/11/10/2244866.html 2. perl? 关联数组 http://developer.51cto.com/art/201007/212308.htm 关联数组和哈希表是同一个东西[详细]
-
perl语言入门(7)
所属栏目:[大数据] 日期:2020-12-16 热度:144
1.什么是正则表达式 ? 也叫模式,就是一个匹配或者不匹配某字符串的模板. 2.使用简易模式匹配 ? # 在匹配$_时,把模式写在正斜杠/就可以了. $ _ ?=? "test" ;? print?ok?if?/test/;? ? # 如果匹配到test打印ok ? # // 要么返回真要么返回假 ? ? 在//中支持: ?[详细]
-
perl stat windows 与 UNIX不同
所属栏目:[大数据] 日期:2020-12-16 热度:125
在 windows perl 下运行如下程序: sub stat{?? ?my ($filename) = @_;?? ?my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksizes,$blocks) = stat($filename);?? ?print "filename is $filename:n"; ?? ?print "Dev is $dev,I[详细]
-
perl 得到指定目录中的指定内容
所属栏目:[大数据] 日期:2020-12-16 热度:83
两种方法,第一种方法是可以使用 chdir + glob,但是这种方法对于 . 和 .. 文件要 分开处理, 另外一种方法是使用目录句柄DH: opendir,readdir,closedir,这种方法可以获取所有的文件,包括. 和..文件。。。。。 第一种方法示例如下: 1) #!perl use strict;[详细]
-
PERL下防止饱和运算(超过最大值自动翻转)
所属栏目:[大数据] 日期:2020-12-16 热度:196
关于饱和运算请百度一下即可。 最近需要将字符串hash成数字,在网上搜了一下,发现BKDRHash算法是效率最高、冲突较少的算法,于是乎试图将C代码的该算法移植到PERL下,结果发现在PERL下,默认是饱和运算……这可不行,因为该算法就是不停的计算,如果是饱和[详细]
-
百度下拉框联想词获取(perl实现)
所属栏目:[大数据] 日期:2020-12-16 热度:152
? #!/usr/bin/perl use strict; use warnings; use Encode; use LWP::Simple; my $tword="中国"; my $url='http://suggestion.baidu.com/su?wd='.$tword.'cb=window.bdsug.sugfrom=superpaget=1335581987353'; $url= encode("utf-8",decode("gbk",$url)); $u[详细]
-
perl中的my和our
所属栏目:[大数据] 日期:2020-12-16 热度:131
? ? ? ? ? ? ? ? ? ? ??our 和 my 一样,都是对变量的声明,? 不过 our 声明的是包全局变量,? 而 my 声明的是词法变量。? 不过,经过 our 声明的变量,它会变得像一个词法变量一样,? 其实这也是 our 存在的目的:用来欺骗 strict pragma,使 strict 以为它[详细]
-
各种平台下Perl模块的安装方法
所属栏目:[大数据] 日期:2020-12-16 热度:77
各种平台下Perl模块的安装方法 Perl到了第五版增加了模块的概念,用来提供面向对象编程的能力。这是Perl语言发展史上 的一个里程碑。此后,广大自由软件爱好者开发了大量功能强大、构思精巧的Perl模块,极大地 扩展了Perl语言的功能。CPAN(Comprehensive Pe[详细]
-
postfix邮件队列管理
所属栏目:[大数据] 日期:2020-12-16 热度:51
? ? ? 最近管理邮件系统时发现几个问题,一个是有些用户设置了转发,但是转发地址有问题,经常因为退信而塞爆 邮箱(有邮箱限额),之后的邮件都会被塞到等待队列里。还有就是有许多寄到本地虚拟域的信没有对应的用户,按说 Postfix 应该不会投递这类邮件,[详细]
-
Perl 内部结构详解 -- PerlGuts Illustrated (1)
所属栏目:[大数据] 日期:2020-12-16 热度:188
首先看一下Perl data structure。Perl内部称为SV(scalar value),AV(array value),HV(hash value),此外IV代表integer,NV代表double,PV代表string,RV代表指针,指向另外的任意数据结构。 Perl内部的数据结构之间的关系很像OO,用C structure内存裁减的方式模拟[详细]
-
perl获取当前系统用户名以及其他
所属栏目:[大数据] 日期:2020-12-16 热度:142
http://hi.baidu.com/study_cs/item/03d6ce26d8b58e4247996223 在perl中获取当前登陆的用户名,要求在windows和linux下都可用.通过读取系统的环境变量实现,在xp和linux下测试通过,代码如下:? ? ? my $Sys_name = $^O; ? ? if ($Sys_name =~ /MSWin32/){ ? ?[详细]
