-
perl hash 按value/按keys 排序(多种方法)
所属栏目：[大数据] 日期：2020-12-16 热度：127
http://hi.baidu.com/justrecording/blog/item/ddf76012636af19c6438db7d.html use ?strict ; my % hash = ( 'a' 2 , 'b' 3 'c' 1 ) foreach $ key sort { hash b } a } keys { ? ?? print "=" "n" ; } perl中如何将按hash key值排序 如果是按ASCII码排序，[详细]
-
循序渐进 学习perl
所属栏目：[大数据] 日期：2020-12-16 热度：107
http://net.pku.edu.cn/~yhf/tutorial/perlstep/perlstep.html[详细]
-
Perl篇：Oracle 10g与安装Perl环境时的冲突以及解决方法
所属栏目：[大数据] 日期：2020-12-16 热度：167
Perl篇：Oracle 10g与安装Perl环境时的冲突以及解决方法 ?? ? ? 从官网下载完Active Perl5.10安装完后，写了很简单的Perl脚本，仅引用了一个文件拷贝模块，调用Perl解释器来运行程序的时候，报了一堆错，先是一个弹出框提示‘无法启动此程序，计算机丢失Perl[详细]
-
perl脚本实例链接
所属栏目：[大数据] 日期：2020-12-16 热度：159
之前学习perl脚本，整理了书上的代码实例，分享给初学的童鞋。 下面是下载链接： http://dl.dbank.com/c08sczyxf7 请多多赐教，互相学习！[详细]
-
perl uc,lc,ucfirst,lcfirst的用法
所属栏目：[大数据] 日期：2020-12-16 热度：125
在perl中，我们可以通过uc,lc,U,L来修改变量的大小写。其中uc，U是将变量中的字母全部转换为大写，对应的lc和L是将变量中的字母全部转换为小写。如果我们只想将变量的首字母大写或将变量的首字母小写，我们可以使用perl提供给我们的另外两个函数ucfirst[详细]
-
Perl中find的用法
所属栏目：[大数据] 日期：2020-12-16 热度：146
find通常被用来查找特定路径下的特定文件，用来搜索文件名非常有用，是perl中使用非常广泛的文件操作函数。 ???? 先看个例子： ???? use File::Find; ???? find(PrintName,@curDir); ???? sub PrintName{ ????????????????????????? my $path; ????????????[详细]
-
perl语言svg制图模板化
所属栏目：[大数据] 日期：2020-12-16 热度：155
? svg制图如果不转换坐标的话，很容易弄错坐标是怎么转换的，这儿把坐标一般化，用几何画板把各个一般化的各个点坐标给标出来，然后以后要是用的话就可以直接作图，方便多了。（这儿用的是perl语言，所以每个变量都是用perl语言的变量转换的） 分为两部分：[详细]
-
关于perl
所属栏目：[大数据] 日期：2020-12-16 热度：74
一、????????Perl中常见的函数 1.????chop函数会砍掉字符串变量的最后一个字符，并返回砍掉的字符。示例：$last_char = chop($var); 2.????split函数?split(/pattern/,$text,limit)其中/pattern/是文字处理模式，而limit是代表要分割的个数，一般可以省略。[详细]
-
perl倒计时脚本
所属栏目：[大数据] 日期：2020-12-16 热度：70
小工具，60秒倒计时，然后执行其他工作。 #!/usr/bin/perl #赵云 for ($i=16 ; $i= 0; $i-- ) { ? if($i = 10){ ??? print "abbbbbbbbbbb"; ??? system 'sleep 1'; ??? print "### $i ###"; ?? }else{ ??? print "abbbbbbbbbbb"; ??[详细]
-
最近的一次Perl Session
所属栏目：[大数据] 日期：2020-12-16 热度：74
? ? ? ? 最近部门里有两个团队里需要用到Perl， 但几乎没有人接触Perl这个奇怪的语言。 很凑巧，我在闲聊中透露了自己是Perl爱好者，于是就被叫过去给同事们做一个介绍性质的session。 我只是个Perl初学者，但考虑到Perl还是给我带来了很多乐子，我也想尝试[详细]
-
AV防病毒服务器搭建
所属栏目：[大数据] 日期：2020-12-16 热度：62
支持的代理服务器： Squid( 支持 ICAP 协议 ) Blue Coat SG Appliance NetApp/Blue Coat NetCache Cisco ACNS Content Engine ? 软件要求： Perl 5.0 以上版本 ? 安装方法： 建立一个 kaspersky 目录，把安装程序和授权许可文件复制到 kaspersky 目录中。 rp[详细]
-
perl -- 子过程-->语法
所属栏目：[大数据] 日期：2020-12-16 热度：114
? 1、声明一个命名子过程，但不定义： sub NAME sub NAME PROTO sub NAME??????? ATTRS sub NAME PROTO? ATTRS 如果要定义一个子过程，只要在上面加上一个BLOCK就可以了 sub NAME PROTO? ATTRS BLOCK PROTO和ATTRS表示原型和属性，相对于NAME和BLOCK不重要，[详细]
-
perl -- 子过程 -->列表处理
所属栏目：[大数据] 日期：2020-12-16 热度：197
? 1、定义子过程最普通的例子： sub razzle{ print "OK,you have been razzled.n";}razzle(); #：省略了输入参数和输出（返回值）。 #：perl向子过程传入数据和子过程传出数据的方法：所有传入的参数被当成单个平面标量列表，类似的多个返回值也被当做单个[详细]
-
perl -- 子过程 -->数组参数传入
所属栏目：[大数据] 日期：2020-12-16 热度：117
1、一个数组参数的出传入： #!/usr/bin/perluse strict;use warnings;my @a = 1..10;my $total = sum(@a);sub sum { my ($tt) = @_; print "$ttn"; my $total = 0; foreach (@$tt){ $total +=; } return $total; }print "$totaln"; 输出结果： ARRAY(0xbc[详细]
-
perl语言入门感悟之一
所属栏目：[大数据] 日期：2020-12-16 热度：85
注：本文为原创，不妥之处请见谅。主要是写给自己的 就是写代码留下来的点点滴滴，些许感悟与大家共勉 1，注意结果写分号 2，print的单引号与非单引号的区别 3. ? print 'hello'."n"; ?连接的时候变为双引号了就。 4 print 可以加逗号的 5.双引号和单引号的[详细]
-
perl转载undef简介 defined函数简介
所属栏目：[大数据] 日期：2020-12-16 热度：97
（一）undef简介? 变量在第一次赋值前有一个特殊值undef，按照Perl来说就是： “这里什么也没有，请继续” 。如果这里的“什么也没有”是一些“数字” ，则表现为 0。如果是“字符串” ，则表现为空串。但undef 既非数字也非字符串，它是另一种标量类型。 由[详细]
-
perl统计日志文件ip及数量
所属栏目：[大数据] 日期：2020-12-16 热度：72
1、先查看下日志的格式： "1.162.50.56,19.97.154.15" - - [04/Mar/2012:10:15:33 +0800] "GET /book/12688.html HTTP/1.0" 200 48407 "http://www.baidu.com/" "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0; GTB6.4; znwb6500; .NET C[详细]
-
perl中的函数参数
所属栏目：[大数据] 日期：2020-12-16 热度：93
perl中的函数参数传入后是存在存在数组@_中的而不是存在$_中，就算有一个元素也是如此。。。。 注意比较以下两个程序的区别，便可理解参数的含义： 1. #!/usr/bin/perluse 5.010;sub greet{state $last;my $name=shift;if(defined $last){print "$last is he[详细]
-
perl模块安装方法
所属栏目：[大数据] 日期：2020-12-16 热度：167
? ? 在网上看到?检查模块是否安装的方法为使用perldoc命令，前提是必须先安装perldoc 如在ubuntu上： $sudo apt-get install perldoc $perldoc CGI 个人认为这个方法有点复杂，直接用 perl -e 'use Data::Dumper' 的方式即可检查该模块是否已经安装，如果没[详细]
-
perl面试例题一
所属栏目：[大数据] 日期：2020-12-16 热度：58
Perl 第一阶段学习总结 1 use strict 和 use warnings 的作用？ use strict 什么场合要用 use strict ？ 当你的程序有一定的行数时，尤其是在一页放不下时，或者是你找不到发生错误的原因时。 为什么要用 use strict ？ 众多的原因之一是帮你寻找因为错误拼[详细]
-
perl命令行开关
所属栏目：[大数据] 日期：2020-12-16 热度：198
纯属个人学习助记笔记，难免有疏漏之处，建议阅读原著《PERL实例精解》 =================================================================================== [开关项] [描述] -0 规定记录分隔符 -a 与 -n 或者 -p 一起使用， 负责打开自动拆分模式， 用[详细]
-
postfix 邮件队列问题
所属栏目：[大数据] 日期：2020-12-16 热度：117
# postfix 如何删除队列中的邮件 linux @ 06 二月 2009, [root@mail ~]# mailq 查看队列邮件 postsuper -d ALL 这样就删除所有邮件啦 [注意：大小写有区别，请注意大小写！] 网上看到，Postfix 邮件队列管理的几个 Perl 小程序，pfdel.pl 是用来删除队列中指[详细]
-
Perl eval函数探讨
所属栏目：[大数据] 日期：2020-12-16 热度：138
Perl 作为一种脚本语言可以实时地生成和执行代码。这种特性可以把代码的编译推迟到运行时，所以又称为“动态代码”。另外， Perl 也如 Java 、 C++ 一样提供了异常处理机制。本文将初步探讨 Perl 中实现动态代码和异常处理机制的函数： eval 。如有错误不足[详细]
-
perl 正则表达式
所属栏目：[大数据] 日期：2020-12-16 热度：134
? 9??? Perl 中的正则表达式 正则表达式是 Perl 语言的一大特色，也是 Perl 程序中的一点难点，不过如果大家能够很好的掌握他，就可以轻易地用正则表达式来完成字符串处理的任务，当然在 CGI 程序设计中就更能得心应手了。下面我们列出一些正则表达式书写时[详细]
-
perl学习笔记(1)
所属栏目：[大数据] 日期：2020-12-16 热度：192
最近想通过51cto和大家分享围绕数据处理分析这一领域的技术经验，正好3月份要完成一项工作任务，主要内容就是修改有关作业调度的perl程序。我用过的语言很多，但是没用过perl，就从这里开始吧。 查看操作系统是否已安装perl的指令： $ perl -v 经查看，我的[详细]
