如何做…？

October 29, 2013 @ 09:58 AM

如何验证 Email 地址是否有效

一般来说，你不能。有一些看起来合理的方法可以使用，但却没有办法检测地址是否实际可以投递，如果没有实际尝试投递的话。

使用正则表达式：

  1. # Match basically blah@blah.blah
  2. if ( $addr =~ /^\S+\@\S+\.\S+$/ ) {
  3.     print "Looks OK";
  4. }

如果你干真活的话，可能希望看看 CPAN 上可用的模块，比如：Email::Address、Email::Valid。

如何从数据库获得数据

DBI 及其 DBD 子模块，如 DBD::SQLite。

如何从网页获得数据

LWP 意为 libwww-perl，它是与网页交谈的标准方式。

WWW::Mechanize 是使 HTML 处理更容易的 LWP 的超集。

如何做日期计算

使用 Date::Manip、Date::Calc、或 DateTime。全部都有不同的样式和不同的能力。

如何处理程序的命令行参数

使用 Getopt::Long。

如何解析 HTML

无论你做什么，都不要使用正则表达式。使用 HTML::Parse 或别的类似东东。如果你解析 HTML 是为了从网页提取链接或图像，不妨使用 WWW::Mechanize。

如何来点颜色

使用 Term::ANSIColor。

如何读取键及不看到输入的密码

使用 Term::ReadKey。