2007年11月07日 用Perl语言进行Socket编程

网络编程是一门神秘且复杂的艺术，当然也十分有趣。Perl语言提供了丰富的TCP/IP网络函数，所有这些函数都 直接来源于C语言的socket库函数.  由于Perl语言和C语言的socket库函数在型式和使用方法上都是一样的，因此会使用Perl语言进行Socket编程, 当 然也就会使用C语言进行Socket编程.  下面是Perl语言中有关的socket库函...

2007年11月07日 单行代码的Perl 程序

精简的代码，虽然可读性不好，但是绝对高效，发挥才思。 一些不同凡响的Unix狂的一个业余爱好就是研究怎样把程序压缩到单行来完成。那些精通Perl 的程序员 能很好地做到这一点。例如一个测试素数的程序： perl -le ’print "PRIME" if (1 x shift) !~ /^...

2007年11月07日 使用 perldoc 找文档

Perl 代有机器庞大的文档库，采用 man 形式存放。如果要查找某一特定的函数，手工查找会非 常困难。但是 perldoc 命令，可以帮你轻松找到所需要的资料： 假设我们要查找 sort 函数的手册，那么： perldoc -f sort 就会告诉你 sort 的用法...

2007年11月07日 在Apache服务器上运行mod_perl

现在网上已经有大量的关于成功运行mod_perl模块的介绍, 该模块可以让Perl程序员更 好地控制 Apache服务器。一旦Apache服务器中内置了mod_perl的Perl解释器， Perl脚 本就可以快速执行，使得你的网页的访问者无需等待。 如果你打算扩展Apache Web server的功能，你可以试试mod_perl模块的威力。模块是个集成到一起的程序集合，可以让网络开发者...

2007年11月07日 执行 mod_perl 模块

执行 mod_perl 模块 如果你正想要扩增你的 Apache 网页服务器 的功能，你或许应该看看模块所能 带给你的是什么。模块，是一个已经经过整合的程序代码，它可以让网页工程师们增加 他们服务器的功能而不用更改服务器本身的程序代码。透过模块，你可以为你的服务器 增添额外的新功能，像是在特定的时间内将 URL 地址转向，或者将你的服务器最佳化， 好让 Perl 的 sc...

2007年11月07日 Perl的经典用法:用Open()函数打开文件

打开文件的常用方法是: open(FH, "< $filename") or die "Couldn’t open $filename for reading: $!"; open() 函数通常带有两个参数，第一个为文件句柄，用于指向打开的文件， 第二个参数是文件名及模式...

2007年11月07日 Perl的经典用法:用Sysopen()进行更多的控制

为了更好的控制文件的打开方式，可以使用 sysopen() 函数： use Fcntl; sysopen(FH, $filename, O_RDWR|O_CREAT, 0666) or die "Can’t open $filename for reading/writing/creatin...

2007年11月07日 Perl的经典用法:读入单个记录

有一个容易的方法读入filehandles：用 操作符。在标量内容下， 它返回文件中的下一个记录，或者返回未定义出错信息。我们可以使用它来把一行读 入到一个变量中： $line = ; die "Unexpected end-of-file" unless defined $line; ...

2007年11月07日 Perl的经典用法:读入多个记录

如果你调用，返回文件中剩余的记录。如果你处于文件尾，则返回空表： @records = ; if (@records) { print "There were ", scalar(@records), " records read.＼n"; } ...

2007年11月07日 Perl的经典用法:读入段落

$/ =""的写法是用来指示Perl读入段落的，段落是由两个或两个以上的 换行符构成的文本块。这不同于设置为"＼n＼n"，后者仅读入由两行组成的文本块。 在这种情况下，将出现这样一个问题：如果有连续的空行存在，例如“text＼n＼n＼n＼n”， 你既可以把它解释为一个段落 ("text")，也可以解释为两个段落 ("text", 后面 跟两个换行符，以及一个空段落，后面跟两...

2007年11月07日 Perl的经典用法:用正则表达式对文件进行操作

一旦你有个包含了整个串的变量，你可以使用正则表达式，对整个文件进行操作， 而不是对文件中的某个块进行操作。有两个有用的正则表达式标记/s和/m。一般，Perl的 正则表达式对行进行处理，你可以这样写： undef $/; $line = ; if ($line =~ /(b....

2007年11月07日 用 Perl 饼来替换文件中的字符串

我们知道 sed 可以用来替换文本，但是会产生副产品：第二个文件。 如果采用 perl 的 -p -i -e 参数，可以解决同样的问题： perl -p -i -e ’s/original text string/replacementstring...

2007年11月07日 进阶: perl解释器的编译安装

 perl 的源码安装相当简单，而 perl 5.84 的安装最快就是以下方式rm -f config.sh Policy.shsh Configure -demakemake testmake install当然，我们还应该更多的实际情况下面的我在 perlchina 服务器上的安装情况1. 安装环境与源码下载perlchina 服务器是 RedHat Enterprise Linux...

2007年11月07日 中级进阶: 匿名散列表与引用

 中级进阶: 匿名散列表与引用 (原创) 编辑 | 删除 | 引用 | 回复 | 短信回复引用，在 perl 里是很有用的，特别是高级、复杂的编程，与 OO 风格的编程中，经常用到。如果你的 匿名散列与引用使用得比较概念清楚，正确使用的话，可以省很多事下面是一个命名散名Code my %personal_info = ( id => ’452226197705300020’, name ...

2007年11月07日 PERL下的正则表达式

 PERL里正则表达式的简介 一、简介 二、匹配操作符 三、模式中的特殊字符 1、字符+ 2、字符 []和[^] 3、字符 *和? 4、转义字符 5、匹配任意字母或数字 6、锚模式 7、模式中的变量替换 8、字符范围转义前缀 9、匹配任意字符 10、匹配指定数目的字符 11、指定选项 12、模式的部分重用 13、转义和特定字符的执行次序 14、指定模式定界符 15、模式次序变量 四、模式...