注：本文翻译自FormBuilder的官方网站的教程。为了方便中文的阅读习惯和理解，我修改了一些英文的表述方式，并增加了一些个人注解。所以本文并不是忠实的翻译原文，用编译可能更合适。版权属于FormBuilder的官方网站。

欢迎来到FormBuilder教程！本教程将会手把手教你使用FormBuilder——从基本的表单到高级的模板和多语言的消息系统。

基础

FormBuilder设计用来处理CGI表单的方方面面——表单的产生、提交和验证。FormBuilder程序经常是反馈给自 身，也就是说你调用一个脚本，基于CGI参数来处理你的整个程序。

FormBuilder使用面向对象的调用风格，但这并不会把你吓跑。其使用非常简单，只需要你了解几个函数而已。在这个文档中， 我们的FormBuilder对象总是用$form来表示，当然在你的脚本中也可以这么使用。

基本步骤：

1. 利用CGI::FormBuilder->new()来创建一个$form对象。
2. 利用$form->field()定义表单域。
3. 使用$form->submitted来检查表单是否已提交，如果是，使用$form->validate来验证。
4. 利用$form->field()来获得每个值，然后做你任何想要的事（比如更新数据库等）。
5. 如 果表单没有提交（或者验证失败），使用$form->render函数来打印表单。

就这么多。FormBuilder将会接管HTML和JavaScript，表格的布局、验证、持续性、错误信息等等。好了，咱们看一个简单的 FormBuilder程序。

下面是一个简单的FormBuilder程序：
#!/usr/bin/perl

use CGI::FormBuilder;

@fields = qw(first_name last_name email phone);

$form = CGI::FormBuilder->new(
fields => \@fields,
);

if ($form->submitted && $form->validate) {
# you would write code here to act on the form data
$fname = $form->field('first_name');
$lname = $form->field('last_name');

print $form->confirm(header => 1);
} else {
print $form->render(header => 1);
}

在上面的程序中，我们首先定义表单的域，然后创建一个$form对象将其纳入（必须使用数组的引\@fields来 确保数据一起传入）。FormBuilder使用这些数据，为每个域创建一个标签，然后使用$form->render 方法将所有的元素放在一个HTML表格中。事实上，FormBuilder甚至可以根据脚本的文件名为表单创建标题。（比如personal_info.pl 变成表单的标题 "Personal Info"）。当用户点击“提交”按钮，$form->submitted将返回true值， 在上面的例子中也会引起$form->validate的执行(由 于if语句中的&&操作符)。如果两者都返回true值，这意味着提交的表单数据有效，然后你就可以处理这些数据了。

使用field()获取表单的数据就像使用CGI.pm中的param()函数一样简单。field() 也有很多其他用处，这个我们以后会提到。好了，看看上面的程序的实际效果吧。 查看浏览器的源代码，可以看到我们的程序产生的HTML代码，这会有助于你的理解。

然后就可以独立运行了：

在浏览器里输入 http://your_host:3000/hi/就可以看到Helloworld字样了。默认端口是3000.

这是作者主页的整个代码：

优势：

• 轻量级，可以在这个基础上继续开发；
• 优雅，符合直觉，比CGI::Application 更方便：
• 支持PSGI，可用于Apache等支持PSGI的server；
• 可以单独运行，standalone模式，作为Application Server；现在的默认httpd是http::server::simple。
• 支持模板dancer::template::simple和template::toolkit

问题：
我试用了一下，用simple模板可以，用TT的没有用，页面是空白，哪位用过指点下。
欢迎大家都来用。

所以，Perl5的书籍还是很重要地，言归正传，下载吧！

通用书籍：

1. OReilly Intermediate Perl (Mar.2006)
2. OReilly Perl Best Practices (Jul.2005)
3. Perl5编程技巧与实例分析.pdf
4. Perl5编程核心技术.pdf
5. Object Oriented Perl.pdf
6. Perl 5 语言命令详解.pdf
7. Perl Cookbook2.chm
8. Perl 参考大全(第二版.pdf
9. Perl实例精解 （第三版）.pdf
10. perl语言编程.CHM
11. PleacPerl.chm

进阶书籍：

1. Advanced Perl Programming （2nd.Edition）
2. Perl Medic Transforming Legacy Code
3. Higher Order.Perl.Transforming.Programs.with.Programs.Mar.2005
4. Mastering Algorithms with Perl
5. Perl.6.and.Parrot.Essentials.2nd.Edition
6. Oreilly.Practical.Mod_Perl.chm
7. Perl.Template.Toolkit.chm
8. Perl编程思想.pdf
9. perl编程思想应用篇.pdf
10. Perl技术内幕.pdf
11. Oreilly Perl DBI.pdf(中文）
12. effective_perl.pdf
13. extreme_perl.pdf

生物信息学相关：

1. Beginning Perl for Bioinformatics
2. mastering Perl for Bioinformatics
3. Genomic Perl: From Bioinformatics Basics to Working Code
4. Bioinformatics, Biocomputing and Perl.An Introduction (Wiley,2004)(ISBN 047085331X)

现在，在windows平台上使用Perl的首选当然是Strawberry Perl，今天“草莓Perl”发布了新版！ Strawberry Perl for Windows .

这个版本发生了很大的变化，不光是安装程序改变了格式。新的安装文件能做以前不容易做的事情——让安装贯穿于整个公司组织（通过活动目录）——以后的版本会做的更多！

迫不及待的想安装？直接去strawberryperl.com吧.这个版本的更新如下：

• 有史以来最大的改进!
  • 第四代基于 WiX 的工具箱 Perl: ist::WiX.
  • 新的.msi安装文件，安装过程有很大的改进。
  • 通过活动目录使安装贯穿整个公司或组织.
  • 卸载程序能正确地删除环境变量.
  • 安装后添加的模块能被卸载程序正确地删除.
  • 整洁的开始菜单，图标也修正了.
• 内置模块的巨大改进：
  • 包含了 所有Perl 5.10.1 CPAN 的自动升级特性
  • CPANPLUS 预配置好了 (但还不是默认的).
  • 根据大家伙的一致要求，DBD::mysql包含在了默认的安装中.

.msi格式的安装文件要求你得以管理员的身份来安装——因为有一些环境变量和注册表的修改。

好了，就说这么多，Happy perling!

• Download Strawberry Perl 5.10.0.6
  XP/2003/Vista/2008/Win7, English, 31MB, Jul 2009
• Download Strawberry Perl 5.8.9.2
  XP/2003/Vista/2008/Win7, English, 30MB, Jul 2009
• Other D: drive, ZIP, and Portable editions

列表：

1. Beginning Perl for Bioinformatics
2. mastering Perl for Bioinformatics
3. Genomic Perl: From Bioinformatics Basics to Working Code
4. Advanced Perl Programming （2nd.Edition）
5. OReilly Intermediate Perl (Mar.2006)
6. OReilly Perl Best Practices (Jul.2005)
7. Pearson Higher Education Perl Medic Transforming Legacy Code
8. Bioinformatics, Biocomputing and Perl.An Introduction (Wiley,2004)(ISBN 047085331X)
9. Higher Order.Perl.Transforming.Programs.with.Programs.Mar.2005
10. Mastering Algorithms with Perl
11. Perl.6.and.Parrot.Essentials.2nd.EditionOreilly.Practical.Mod_Perl.chm
12. Perl.Template.Toolkit.chm
13. Perl5编程技巧与实例分析.pdf
14. Oreilly Perl DBI.pdf(中文）
15. effective_perl.pdf
16. extreme_perl.pdf
17. Perl5编程核心技术.pdf
18. ObjectOrientedPerl.pdf
19. Perl 5 语言命令详解.pdf
20. Perl Cookbook2.chm
21. Perl 参考大全(第二版.pdf
22. Perl编程思想.pdf
23. perl编程思想应用篇.pdf
24. Perl技术内幕.pdf
25. Perl实例精解  （第三版）.pdf
26. perl语言编程.CHM
27. PleacPerl.chm

在windows下，打开ppm，Add repository http://cpan.uwinnipeg.ca/PPMPackages/10xx/package.xml

找到DBD::mysql，安装之。

有了ppm，在win下安装perl的模块就非常方便了。关键你是要找到相关的repository。

下面是一些未被Perl新手充分利用的模块（至少在我看来）。

这些模块有很多用处。最明显的就是，这些模块可以让你写/调试更少的代码，写成的代码对你同事也更清晰，并且大多数情况下，这些模块比你手工弄的代码表现更出色。

列表操作

有两个与列表相关的模块你应该熟悉——List::Util 和它的姊妹模块 List::MoreUtils。

你需要打乱数组的值？不要重复发明轮子，用List::Util 中的 shuffle 函数就好了。

use strict;
use warnings;
use List::Util qw( shuffle );
my @array = qw( 1 2 3 4 5 6 7 8 9 );
my @shuffled = shuffle( @array );

想获得只含有唯一值的列表？你可以使用Perl Cookbook中提供的方法，或者更简单，你可以用List::MoreUtils 中提供的uniq() 函数，就像这样：

use strict;
use warnings;
use List::MoreUtils qw( uniq );
my @array = qw( 1 1 2 2 3 3 4 4 5 5 );
my @unique_values = uniq( @array );

值得一提的是，List::MoreUtils是用C语言实现的，所以它比纯Perl的实现更快。我曾见此模块改进某大型web应用5%的性能，因为它每个页面需要将多个列表唯一化。

你一定要再看看这两个模块里的其它的函数，如any(), all(), first(), max()，等等。你需要从CPAN上安装List::MoreUtils 模块，而List::Util 是Perl的核心的一部分。

合并Hash

你可以用最简单的方式:

my %merged_hash = ( %hash_one, %hash_two );

有时你需要更强点的功能，那就用 Hash::Merge 吧。 它给了你很多方式来处理不一致的键值，基于左右顺序或者存储方法。 或者你可以控制你的数据是否被克隆。我发现这东西在将命令行的参数与配置文件合并的时候特有用。

关于配置选项和文件……

跟我重复一遍： 我不自己写配置解析代码。 我也不发明自己的配置文件格式。除非有特别好的理由，我不会自己解析命令行的参数。

为什么在代码的最无聊的部分浪费你的时间？使用已有的模块和配置文件格式就是了！这将剩下你不少时间和调试的麻烦，也会让你的用户更容易熟悉你的配置文件语法。

我强烈建议你用Getopt::Long 来处理命令行参数。你可能需要点时间来习惯这个模块，但是一旦当你突破最初的学习曲线，你就会发现当初自己手工处理这些东西是多么傻！

如果你喜欢Apache风格的配置文件（谁不？呵呵），那么就用Config::General ，就可将你的配置处理代码缩减成一个use语句和几行代码。你也许更喜欢.INI风格的配置文件，那么就试试Config::Tiny吧。（完）
原文：http://blog.revsys.com/2007/09/under-used-cpan.html

POD2-CN由Fayland发布在CPAN上，其中包含了很多人的贡献：YE Wenbin，ChaosLawful，flw，Achilles Xu，rogerz，等等，不再一一列举。

• 增加了对关键字 'package' 的支持
• 增加了对多行子过程（subroutine）、package和常量定义的支持
• 增加了对可选子过程声明的支持
• 增加了对格式的支持
• 忽略混杂在定义和声明中的注释
• 修复对label名之后带空格的检测
• Fixed misidentification of fully qualified function calls as labels

如果你还没有用过tags或者ctags，现再就开始用吧。你的生活将和以前不再一样。

例如，如果你对源代码树运行ctags，然后再从shell里运行vim -t some_function，vim将会打开此文件并将光标置于some_function之处。另外，如果你用vim编辑一个文件，并将光标置于some_function上，并按下Ctrl-]，vim就跳转到这个函数。其他编辑器也都有类似的绑定。

你的编辑器并不认识Perl，它只是依赖于ctags产生的tags文件，后者是一个标准的文件。当然，ctags并不是Perl本身，所以也没有那么精确。v5.7中的改进将使你的tag文件更为精确。

如果你弄了个Perl的module，也很容易为makefile增加一个tags用的target。你可以从作者的主要的module中（(WWW::Mechanize, ack, 等等)）的Makefile.PL中偷一个来用，或者，你也可以在你的Makefile.PL中增加如下代码：

sub MY::postamble {
my $postamble = <<'MAKE_FRAG'; .PHONY: tags tags: ctags -f tags --recurse --totals --exclude=blib --exclude=.svn --exclude='*~' --languages=Perl --langmap=Perl:+.t MAKE_FRAG }
(自从有了ctags 5.7, 再也不需要 --exclude=.svn 了，因为ctags现在可以自动忽略它了。)
原文链接：http://perlbuzz.com/2007/09/ctags-57-improves-perl-support.html

他同时表示，他平时在TeX和DocBook环境下写作，但是他发现mediawiki更方便单独处理每一章节，并同时看到整体结构图。

Simon Cozens 是一个开源程序员和作者，他发布了超过100个的Perl模块，包括Email::Simple, Mail::Audit, Maypole,Plucene, 和 B::Generate 等。他是《Beginning Perl》 (Wrox)和《Extending and Embedding Perl》 (Manning)的作者之一，并于2001-2004担任 Perl.com 的主编。 他喜欢日本菜，现在日本工作。