| · | 用正则表达式对文件进行操作 2004-05-25
一旦你有个包含了整个串的变量，你可以使用正则表达式，对整个文件进行操作， 而不是对文件中的某个块进行操作。有两个有用的正则表达式标记/s和/m。一般，Perl的 正则表达式对行进行处理，你可以这样写：
undef $/;
= ;
if ( =~ /(b.*grass)$/) {
print "found $1
";
}
如果把我们的文件填入如下内容： browngrass
bluegrass
则输出为：
foun ..
|
| · | Perl的经典用法:读入段落 2004-05-25
$/ =""的写法是用来指示Perl读入段落的，段落是由两个或两个以上的 换行符构成的文本块。这不同于设置为"
"，后者仅读入由两行组成的文本块。 在这种情况下，将出现这样一个问题：如果有连续的空行存在，例如“text
”， 你既可以把它解释为一个段落 ("text")，也可以解释为两个段落 ("text", 后面 跟两个换行符，以及一个空段落，后面跟两个空行。)
在读入文本时，第二个� ..
|
| · | Perl的经典用法:读入多个记录 2004-05-25
如果你调用，返回文件中剩余的记录。如果你处于文件尾，则返回空表：
@records = ;
if (@records) {
print "There were ", scalar(@records), " records read.
";
}
在下面的一步中，进行赋值和测试两项工作：
if (@records = ) {
print "There were ", scalar(@records), " records read.
";
}
chomp() 也可适用对数组操作：
@records = ;
chomp ..
|
| · | Perl的经典用法:读入单个记录 2004-05-25
有一个容易的方法读入filehandles：用 操作符。在标量内容下， 它返回文件中的下一个记录，或者返回未定义出错信息。我们可以使用它来把一行读 入到一个变量中：
= ;
die "Unexpected end-of-file" unless defined ;
在循环语句中，我们可以这样写：
while (defined ( = )) { # long-winded
# is set to each record in the file, one at a tim ..
|
| · | 用Sysopen()进行更多的控制 2004-05-25
为了更好的控制文件的打开方式，可以使用 sysopen() 函数：
use Fcntl;
sysopen(FH, , O_RDWR|O_CREAT, 0666)
or die "Can't open for reading/writing/creating : $!";
函数 sysopen() 带有四个参数，第一个是同open()函数类似的文件句柄参数， 第二个参数是不带模式信息的文件名，第三个参数是模式参数，由Fcntl 模块提供 的逻辑OR运算组合起来的常� ..
|
| · | Perl的经典用法:用Open()函数打开文件 2004-05-25
打开文件的常用方法是:
open(FH, "< ")
or die "Couldn't open for reading: $!";
open() 函数通常带有两个参数，第一个为文件句柄，用于指向打开的文件， 第二个参数是文件名及模式(文件的打开模式)的混合体，如果文件被成功打开， open()函数返回true，否则为false。我们用“or”来测试该条件。
上述代码中的模式由小于字符( ")
or die ..
|
| · | 响应头204的应用 2004-05-25
先看一个常见的CGI输出的例子：
#!/usr/bin/perl
print"Content-type:text/html
";
print"";
print"xyz";
print"";
当我们在提交一份表单按下提交的按钮时，通常都会切换到一个新的页面。所以要想提交后
保留在原有页面的内容的话，惯用的方法是重新连接回刚才提交的URL，但是有时切换页面
需要保存一些中间的数据，为编写代码带来很多麻烦，而且为WEB服务器带来不少负 ..
|
| · | 用Perl语言进行Socket编程 2004-05-25
网络编程是一门神秘且复杂的艺术，当然也十分有趣。Perl语言提供了丰富的TCP/IP网络函数，所有这些函数都
直接来源于C语言的socket库函数.
由于Perl语言和C语言的socket库函数在型式和使用方法上都是一样的，因此会使用Perl语言进行Socket编程, 当
然也就会使用C语言进行Socket编程.
下面是Perl语言中有关的socket库函数列表：
函数原型 使用说明
accept(NEWSOCKET,GENER ..
|
| · | Perl DBI 入门 2004-05-25
本文是以 Perl DBI Examples 为蓝本，配合 DBMaker 好学易用的特性，以及几个浅显易懂的例子，希望能够一步步地带领使用者学习 Perl DBI modules 存取 DBMaker 资料库的方法。而原作者撰写主要原动力是希望藉由这篇文章的问世，以降低 DBI mailing list 中一再重出现的 FAQ。
读完本文之後，我们就能学到利用 DBI 建立一个完备的资料库程式。 以下就先由 DBI 的基本功能开始，然後再� ..
|
| · | 各种平台下Perl模块的安装方法 2004-05-25
Perl到了第五版增加了模块的概念，用来提供面向对象编程的能力。这是Perl语言发展史上
的一个里程碑。此后，广大自由软件爱好者开发了大量功能强大、构思精巧的Perl模块，极大地
扩展了Perl语言的功能。CPAN（ComprehensivePerlArchiveNetwork）是internet上Perl模块
最大的集散地，包含了现今公布的几乎所有的perl模块。
几个主要的CPAN站点有：
国内：ftp://freesoft.cgi.g ..
|
| · | Perl文件及目录操作 2004-05-25
大多数程序都不是孤立的,它们与它们的环境相互作用。很多的程序也需要通过文件操作实现数据的存贮和交换。 文件句柄(file handle)是Perl程序中为程序和外部世界提供I/O连接的名称。建议全部使用大写字母以示与变量等的区别。特别地，也可以将STDIN/STDOUT/STDERR也认为 是Perl的文件句柄，分别代表标准输入/标准输出/标准错误输出。
打开及关闭文件
Perl的文件操作与C语言极为� ..
|
| · | Perl进程管理 2004-05-25
当你向系统shell发送一个命令行时，shell创建一个进程来执行这个命令。这个新进程成为shell的子进程，它的执行不依赖于shell但又与shell相互协调。
同样，Perl程序也能启动新进程。
使用system()和exec()
生成新进程的最简单的方法就是用system操作符。如：
system("date");
若要将输出送至now_day文件，则可以：
system("date>now_day") ||die "不能建立n ..
|
| · | Perl的基本输入输出 2004-05-25
从STDIN输入
从标准输入设备读取数据是很容易的，我们已经从第一课上就使用＜STDIN＞操作符了。例如：
=＜STDIN＞;
在数组环境中，可把所有剩余的行作为一列表返回。如：
@name=＜STDIN＞;
此时，需要读入多行，然后再对各行分别处理。通常做法是：
while(=＜STDIN＞){
chop();
#处理(每一行)
}
上述程序可简化为：
while(＜STDIN＞){ ..
|
| · | Perl常用系统函数 2004-05-25
指令：print
语法：print Filehandle LIST
说明：这个Filehandle可以看作在I(INPUT)/O(OUTPUT)之间的一个桥梁,可以利用FILEHANDLE来做出数据读入写 出的动作.STDIN是代表从哪连输入数据,例如从电脑的键盘输入;STDOUT是代表从哪连输出数据;例如从电脑的屏 幕输出;STDERR是代表从哪连输出错误的数据,例如从电脑的屏幕输出.而在PERL语言中有三个标准FILEHANDLE： 1.STDIN(标准输入)� ..
|
| · | CGI读写COOKIE的编程 2004-05-25
COOKIE的用途相信大家都知道了，有时我们的CGI需要记录读取某个来访者的信
息，例如该来访者使用该CGI的情况，那就得用到COOIKE技术，下面就讨论一下
如何用CGI来记录、读取来访者计算机中的COOKIE。
COOKIE在不同的浏览器上的存储方式是不同的，但这并不存在不兼容的问题，因
为WEB服务器与浏览器之间是通过HTTP响应头实现互相传送COOKIE的信息的，我
们在读写COOKIE时不必理会� ..
|
