Perl 到了第五版增加了模块的概念,用来提供面向对象编程的能力。这是 Perl 语言发展史上的一个里程碑。此后,广大自由软件爱好者开发了大量功能强大、构思精巧的 Perl 模块,极大地扩展了 Perl 语言的功能。CPAN(Comprehensive Perl Archive Network)是 Perl 模块最大的集散地,包含了现今公布的几乎所有的 perl 模块。
这篇文章讲述了如何在受限制的系统环境中安装跨平台与依赖平台的模块。这样即使你的服务器不支持DBD::mysql你也可以在网站中连接MySQL了,条件是可以FTP上传。 如果你的服务商只提供FTP给你,而你的老板让你运行一个带有MySQL的程序。如果你想给服务器上某个程序一些模块但是又不打算修改系统的结构。这听起来象是厄运,
正则表达式的三种形式 首先我们应该知道 Perl 程序中,正则表达式有三种存在形式,他们分别是: 匹配:m// (还可以简写为 // ,略去 m) 替换:s/// 转化:tr/// 这三种形式一般都和 =~ 或 !~ 搭配使用(其中 "=~" 表示相匹配,在整条语句中读作 does,"!~" 表示不匹配,在整条语句中读作 doesn''t),并在
此例子主要用于需要文件加锁的脚本,防止多用户同时访问时出错#!/usr/bin/perl w #count file: 0 use strict; use Fcntl qw(:flock); my $sem="/tmp/sem.sem"; sub get_lock else } } sub release_lock sub read_data sub write_data close(FH); } #main# get_lock(); if (flock(SEM, (LOCK_EX|LOCK_NB))) else
下面是一个使用Pg类联结postgres的例子: #!/usr/bin/perl w use strict; use Pg; my $pghost=''xxxx.xxxx.xxx''; my $pgport=''5433''; my $pgdatabase=''test''; my $pguser=''xxxxx''; my $pgpassword=''xxxxxxx''; my $conn=Pg::connectdb("pghost=$pghost pgport=$pgport pgdatabase=$pgda
利用index 和 rindex 函数遍历搜索 从左向右 #!/usr/bin/perl $a="aa ab ac abc ab"; sub searchstr print "Input search sub string:"; $char=<STDIN>; chomp $char; print "Search start:"; $search=<STDIN>; chomp $search; while (($search=searchstr($a,$char
写Exploit程序,从Perl网络编程起步 Perl很强大,不仅能开发CGI方面的程序,还可以用它进行网络程序的开发。Perl使网络编程更简单,开发速度更快。目前Perl应用范围除了系统维护,程序运行时配置CGI(现在应用的很少了),便是用来进行hacker脚本的编写。Perl脚本的特点是 “简练而强大”,非常适合写Exploit。在网络上
Ajax, 最近非常红火的技术。有很多现成的开发工具包。开始的时候我试用了CPAINT,支持php/asp。还不错。后来开始用perl的Ajax实现: CGI::Ajax。对比之下,发现非常好用。主要的特点是程序自动生成javascript调用的代码。这样的话,我们可以专注于程序逻辑的开发,而不用去理睬繁复的Ajax javascript调用。这是CGI::Ajax高
指令:print 语法:print Filehandle LIST 说明:这个Filehandle可以看作在I(INPUT)/O(OUTPUT)之间的一个桥梁,可以利用FILEHANDLE来做出数据读入写 出的动作.STDIN是代表从哪连输入数据,例如从电脑的键盘输入;STDOUT是代表从哪连输出数据;例如从电脑的屏 幕输出;STDERR是代表从哪连输出错误的数据,例如从电脑的屏幕输
今天忽然发现kpi的告警程序运行起来超级慢,经过仔细分析发现是由于时间问题导致的。 unix平台下,ls lrt命令只能显示出月、日,小时:分钟,对于过早的文件才会在日期处显示成年,以前的程序忽略了跨年显示的情况,导致程序把去年的文件也当作符合时间点的文件进行分析了,从而影响了程序的效率。 新程序的思路如下:
在perl语言中使用DBI连接数据库: 连接MYSQL: my $dbh=DBI>connect(''DBI:mysql:database=mddb;host=*.*.*.*;port=8848'',''mysql'',''mysql'', ); my $sql = qq; my $sth = $dbh>prepare( $sql ) or die "Can''t prepare $sql"; $sth>execute(); my( $count ); $sth>bind_columns( unde
1. Perl的DB2驱动 Perl语言本身就不多做介绍了。 1994年发布的DBI是Perl语言连接关系性数据库的标准。可以从dbi.perl.org获得DBI的源代码和文档。 IBM在1995年发布了对于Perl的DB2驱动,这个驱动是符合DBI标准的,在Perl里这个驱动称为DBD::DB2 。可以从ibm.com/software/db2/perl获得DBD::DB2驱动的最新信息。
1) 知识准备: 为了使用Perl语言去存取mSQL和MySQL数据库的内容,必须安装一些API模块,以下列出一些必须安装的模块名称说明和其下载网址: i) 常规安装必须的模块: DBI1.13 Perl语言的数据库通用接口 DataShowTable3.3 Perl5的一个模块,定义
一 前言: 随着email在企业里广泛使用,它已经成为传播病毒的最主要的手段,保护企业用户免受可能带病毒的邮件附件的感染,尤其是可执行文件的邮件附件,我们需要过滤那些可能带有病毒的附件的邮件,当前主要的做法是在Sendmail把邮件送到用户信箱前由Procmail进行过滤,但是更好的方法是在SMTP传送期间由Sendmail本身进
本文介绍如何用Perl来管理Apache验证身份时所用的密码,包括如何加密密码,如何修改文本文件、DBM数据库、MySQL数据库中的用户记录,等等。 一、加密密码 有的文章讨论了在Apache上实现身份验证的各种方法,即如何在用户访问某些受保护的资源时显示一个要求输入名字和密码的对话框。手工管理密码往往是非常麻烦的,
现在网上已经有大量的关于成功运行mod_perl模块的介绍, 该模块可以让Perl程序员更好地控制 Apache服务器。一旦Apache服务器中内置了mod_perl的Perl解释器, Perl脚本就可以快速执行,使得你的网页的访问者无需等待。 如果你打算扩展Apache Web server的功能,你可以试试mod_perl模块的威力。模块是个集成到一起的程序集