上一篇列出了Perl中定义数组，对象的方式与JS的异同。这里继续补充数组，哈希的相关操作。   一、数组 可以对数组进行增删，插入。与JS不同的是这些函数都是全局的，JS则是挂在Array.prototype上。 1，对数组尾部的 ...……

原文地址：http://blogread.cn/it/article/743?f=wb   用Perl写了一些监控脚本，放在crontab中调度执行。有时候会发现一个脚本运行时间过长，会同时跑起多个实例，因此有必要为脚本加上控制，只运行一个实例。 最简 ...……

1、统计分析日志：将结果保存在一个txt文件中，最新版本支持xml数据格式。 2、输出分析结果：利用cgi程序输出，或生成静态html文件进行浏览。   在Windows下安装 AWStats是perl语言书写的程序，所以必选先安装Act ...……

本文罗列了一些常用的正则表达式，不间断更新中。。。 s/^\s+// 去除尾部空格 s/\s+$// 去除前后空格 s/^\s+|\s+$//g 匹配任意字符 /.*/s 这里/s表示连换行符也匹配，因为.是不匹配换行符的，所以上面的表 ...……

用index查找子字符串 查找子字符串在主字符串中的相对位置。如： $where=index($big,$small); 注意index是从0开始的，如果查找不到就会返回-1； 加入第三个参数来指定开始搜索的地方，这样index就不会从字符串的最开 ...……

终端输入：perl -MCPAN -e shell 　进入cpan交互模式： 下面是常用 cpan 命令。 　　获得帮助 　　cpanamp;amp;gt;help 　　列出CPAN上所有模块的列表 　　cpanamp;amp;gt;m 　　安装模块，自动完成Net::Server模块 ...……

偶然的机会，看到了Perl，感觉挺好玩的。发现同学那恰好有本《Learningperl》，于是就借过来，拜读了一下，感觉写的非常不错，语言很幽默，内容也非常的棒。这也是国外的技术书比国内的技术书有意思的一点吧。 骆驼 ...……

按照first name找last name 知识点:　　1. hash的使用和初始化　　2. 使用exists函数检测hash中的键是否存在……

到底web服务器的极限是多少呢？100 r/s？ 500 r/s？还是1000 r/s？ 在StaticGenerator上看到，原来1000 r/s都不算什么. 真的是这样吗？如果是真的那就太恐怖了。 目前的web基本上都是动态的，为了提高性能，我们常 ...……

我们经常会遇到Genesis2000中C-shell的脚本不能正常运行的问题,而同样的程序在其它电脑上又可以正常运行,如果你能看看Genesis后台窗口,也就是后面那个黑乎乎的窗口(所谓的小DOS窗口),也许能发现一些门道,常见的错误 ...……

工作需要，闲暇之余，仔细研究了一下脚本乱码的问题1.vim新建的文件1）在linux命令行vim命令建立的文件，如果内容中不出现中文，默认是ASCII。那么用notepad++打开的时候，就是“以ASC格式编码”。如下面的:99.txt2) ...……

我们知道,switch语句叫做开关语句或选择语句,它可以用来设计多路分支选择结构.可是在PERL5中并没有提供单独的SWITCH语句,但是我们可以利用语言本身提供的其他语句来模拟实现,下面给出实现形式:SWITCH:{if(conditione ...……

perlbrew可以用源码方式安装perl的各种版本，可以容纳多个perl版本共存，并随意切换。 1、把perlbrew安装到home目录： curl -L https://install.perlbrew.pl | bash 2、编辑home目录的.bashrc文件，添加perlbrew的可 ...……

Perl面向对象编程全文510页,可参考相关资料,作者:DamianConway目录-----------------------------------------------------序前言致谢在线1 你首先需要知道的（面向对象入门）1.1 面向对象本质.1.2 面向对象其它 ...……

最早就是写Perl的，后来来到公司转Python，现在又要负责流程了，开始重拾Perl，当然是借鉴别人现有的语法，我再重新组合。基本语法就不介绍了，参照我之前文章Perl usestrict; useFile::Path;【Perl】Path::File目 ...……

与上个月相比，Python 的指数又增加了不少，由 8.530% 上升到 9.260%。 我们还留意到，TIOBE 对这期榜单的标题描述是“Perl is one of the victims of……

且看一段代码 ( my $pgm = $0 ) =~ s!.*/(.*)!$1! ; 如果我们运行脚本的命令是perl d:/code/test.pl -f c:/test 那么$0获取的是脚本本身，也即d:/code/test.pl 正则表达式s!.*/(.*)!$1!是将脚本全名中的路径去掉， ...……

获取主机名、用户、组、网络信息相关函数 首先是获取主机名的方式，Perl提供了Sys::Hostname模块，可以查询当前的主机名： use Sys::Hostname; print hostname, amp;quot;\namp;quot;; Perl中提供了下面一大堆的内 ...……

下载perl编译器。下载地址：http://pan.baidu.com/s/1i3GLKAp下载后的文件如下图所示。 perl的安装。直接双击运行下载的文件，首先会出现perl版本等等信息的介绍，不要理，直接next就会出现是否接受perl安装说明， ...……

Perl有很多命令行参数.通过它,我们有机会写出更简单的程序.在这篇文章里我们来了解一些常用的参数.SafetyNetOptions在使用Perl尝试一些聪明(或stupid)的想法时,错误难免会发生.有经验的Perl程序员常常使用三个参数来 ...……

数组： 特殊的数组索引：加入对索引值超过数组尾端的元素进行赋值，数组将会根据需要自动扩大，只要有可用的内存分配给数组。意外增加的数组元素的值为undef. $a=amp;quot;aaamp;quot;; $a=amp;quot;bbamp;quot;; $a ...……

继周六的p_enum.pl后，再来一篇说说我用perl做的lex，yacc工具。之前说了，我学习lex和yacc的最初动机是为了做个C语言解释器的SHELL；但后来工作中的实际需要也是制作perl版lex和yacc的一个动机。Perl库里有lex和yac ...……

perl使用LWP模块写的翻译小程序 - 第2012位菜鸟 - 博客园perl使用LWP模块写的翻译小程序perl的LWP是抓取网页的经典模块，学习的过程中用这个模块写了一个小程序，是通过 ...……

编码问题是广泛存在的，只有正确的编码才能在不同的地方正确的显示内容。而在数据的获取和转移过程中，编码经常是很需要注意的问题。perl有功能很好的编码处理模块Encode。在程序里简单的useEncode就可以使用了。用 ...……

一、条件判断  if(amp;amp;lt;expressionamp;amp;gt;){    amp;amp;lt;statement_block_1amp;amp;gt;  }  elsif(amp;amp;lt;expressionamp;amp;gt;){    amp;amp;lt;statement_block_2amp;amp;gt;   ...……

Perl条件语句是通过一条或多条语句的执行结果（True或者False）来决定执行的代码块。 条件判断常用：True     #布尔值notTrue  #布尔值!True    #布尔值False    #布尔值数字0、字符串'0'、amp;quot ...……

在perl中，普通变量被称为amp;quot;标量变量amp;quot;(scalar)，标量是指单个值的意思。还有非标量的数据，如数组、列表、hash等。标量变量和这种非标量的关系，类似于英语里面的单数和复数。 amp;quot;$amp;quot;开 ...……

由于linux上处理word和ppt比较麻烦，而且有文件格式专利的问题，所以以下操作全部在Windows下面进行。首先需要安装Microsoft Save as PDF加载项，官方下载地址：http: ...……

注意：localtime获取的年份是相对于1900的偏移，需要加上1900，而localtime获取的month范围是0-11,需要加1。 my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime(); $year += 1900; $mon+ ...……

      从官网下载完Active Perl5.10安装完后，写了很简单的Perl脚本，仅引用了一个文件拷贝模块，调用Perl解释器来运行程序的时候，报了一堆错，先是一个弹出框提示‘无法启动此程序，计算机丢失Perl58.dll’， ...……

不同进程之间的通信或进程间通信(InterProcess Communication, IPC)，是一个涉及多个方面的主题。Perl提供了多种进程间通信的方式，本文将逐一介绍。本文的内容主体来自于《Pro Perl》的第21章。 单向管道(unidirect ...……

    在新的Linux Server（Red Hat Enterprise Linux Server release 5.7 (Tikanga)）上配置磁盘空间告警的perl脚本后，测试时报如下错误 $ ./disk_capatiy_alarm.sh Can't locate Mail/Sender.pm in @INC (@INC ...……

 标量标量是Perl中最简单的数据类型。大多数的标量是数字(如255或3.25e20)或者字符串(如hello或者盖茨堡地址)。数字perl中所有数字内部的格式都是双精度浮点数。浮点数1.25255.000255.07.25e45#7.25x10的45次方(一 ...……

原文发表于网易博客 2010-11-16 13:39:42 learning perl第5章的练习题有点意料之外，虽然第5章讲的是基本输入输出，但是实现习题时，还是花了我一段时间用来去前面几个章节回顾了一下。呵呵，把数组知识也用进去了 ...……

http://www.cnblogs.com/perl6/p/6911166.html之前这里有个小小例子，这里只要是总结一下。 HTTP::UserAgent包含了以下模块:----------------------------------------------------------------------------------- ...……

1. 题目 2. 代码与输出  1 #-----------------------------------------------------------# 2 # Source: Learning Perl, chapter10,exercise-1 3 # Date:   2012-01-20 4 # Author: xiaodongr ...……

    pop函数会删除并返回数组的最后一个元素。@array=5..9;$fred=pop(@array);#$fred变成9，@array现在是(5,6,7,8)$barney=pop@array;#$barney变成8，@array现在是（5，6，7）pop@array;#@array现在是(5,6)(7被 ...……

转载：http://www.cnblogs.com/xinghua/archive/2007/02/07/643867.html一）sort函数sortLISTsortBLOCKLISTsortSUBNAMELISTsort的用法有如上3种形式。它对LIST进行排序，并返回排序后的列表。假如忽略了SUBNAME或BLO ...……

  1 数组与引用 2 声明的区别 3 访问的区别 4 添加行元素 5 添加列元素 6 访问与打印 6.1 运算符优先级 6.2 访问一个 6.3 遍历 7 切片 1 数组与引用 此处引用相当于C中的指针。 二维数组第 ...……

Perl链接数据库并不难，但是对于很多初次解除的人来说，经常会遇到一些问题，本文总结了一些无法链接的问题，供大家参考由于我机器上只有SQLServerExpress版本，所以就以它为例，企业版大同小异。一确保数据库服务已 ...……