发送电子邮件
书中主要是以PEAR中的邮件发送类（Mail）来讲解的（关于如何在WIN系统下安装PEAR可以参考WIN下成功安装PEAR）。PEAR的MAIL类可以通过3种方式来发送电子邮件：
- 通过PHP内部的mail函数来发送
- 通过sendmail程序来发送
- 通过直接连接到一个smtp服务器发送邮件
书中主要以第一种方式来讲解，下面贴一个用SMTP发送邮件的例子
require_once('Mail.php');//包含mail.php函数$params = array('host' => 'smtp.sina.com','port' => '25','username' => 'yourname@sina.com','password' => 'yourpassword','auth' => true);//必须保证这一行$recipients = 'xxxx@sina.com'; //接收人，可以是一个数组来存放多个地址$headers['From'] = "yourname@sina.com";$headers['To'] = "xxxx@sina.com";$headers['Subject'] = "主题";$body = "内容";//选择smtp的发送方式，当然还支持mail()和sendmail$mail_object = &Mail::factory('smtp', $params);if (PEAR::isError($e = $mail_object->send($recipients, $headers, $body))) {die($e->getMessage() . "\n");}通过IMAP或POP3读取邮件
这种方式主要用来读取邮件的内容，像开心网等都有个导入邮箱联系人的功能，我原来一直以为是通过这2个协议来实现的，后来查了下资料才发现，原来是通过cUrl实现的。
// open IMAP connection
$mail = imap_open('{mail.server.com:143}', 'username', 'password');
// or, open POP3 connection
$mail = imap_open('{mail.server.com:110/pop3}', 'username', 'password');// grab a list of all the mail headers
$headers = imap_headers($mail);// grab a header object for the last message in the mailbox
$last = imap_num_msg($mail);
$header = imap_header($mail, $last);// grab the body for the same message
$body = imap_body($mail, $last);// close the connection
imap_close($mail);PHP访问FTP资源
通常有两种方式：
- PHP内置的FTP函数
- cURL扩展
下面是通过PHP内置函数实现的读取FTP的目录下的文件列表
set_time_limit(120);
$host="127.0.0.1";//主机名
$uname="username";//用户名
$pwd ="password";//密码
$c = ftp_connect($host) or die("Can't connect");
ftp_set_option($c,FTP_TIMEOUT_SEC,120);
ftp_login($c,$uname,$pwd) or die("Can't login");
ftp_pasv($c, TRUE);
$ddd = ftp_nlist($c,".");
ftp_close($c) or die("Can't close");
var_dump($ddd);
print("OK");DNS相关函数
查询一个域名的ip地址：gethostbyname( )
查询一个IP上的域名（不完全可信）：gethostbyaddr( )
一个域名可能绑定多个IP：gethostbynamel( )
获得mx记录：getmxrr( )
实现PING一个主机
PEAR提供的Net_Ping包可以实现这个功能
$results = $ping->ping('www.oreilly.com');
foreach($results as $result) { print "$result\n"; }
$results = $ping->ping('www.oreilly.com');
foreach($results as $result) { print "$result\n"; }返回的信息是一个整块，需要其中的个别值还需要自己解析，实现的效果可能如下面显示的这样
PING www.oreilly.com (209.204.146.22) from 192.168.123.101 :32(60) bytes of data. 40 bytes from www.oreilly.com (209.204.146.22): icmp_seq=0 ttl=239time=96.704 msec 40 bytes from www.oreilly.com (209.204.146.22): icmp_seq=1 ttl=239time=86.567 msec 40 bytes from www.oreilly.com (209.204.146.22): icmp_seq=2 ttl=239time=86.563 msec 40 bytes from www.oreilly.com (209.204.146.22): icmp_seq=3 ttl=239time=136.565 msec 40 bytes from www.oreilly.com (209.204.146.22): icmp_seq=4 ttl=239time=86.627 msec-- - www.oreilly.com ping statistics -- - 5 packets transmitted, 5 packets received, 0% packet loss round-trip min/avg/max/mdev = 86.563/98.605/136.565/19.381 ms
获取域名相关的信息
需要用到PEAR的另一个类Net_Whois，其中whois服务器的选择是这个功能的关键，如果不知道如何选择whois服务器，可以将$server用'whois.internic.net'替换：
require 'Net/Whois.php';
$server = 'whois.networksolutions.com';
$query = 'example.org';
$data = Net_Whois::query($server, $query);
