use Net::SMTP::TLS;  

my $mail = 'to@to.to';

my $subject = 'some subject';

my $msg = 'body here'    
    my $mailer = new Net::SMTP::TLS(
        'smtp.gmail.com',
        Hello   => 'smtp.gmail.com',
        #Port    =>      465, #redundant
        User    =>      'wanmyome@gmail.com',
        Password=>      'mypass',
    );

    $mailer->mail('wanmyome@gmail.com');
    $mailer->to($mail);
    $mailer->data;
    $mailer->datasend("From: Wan Chaowei\n");
    $mailer->datasend("To: $mail\n");
    $mailer->datasend("Subject: $subject\n\n");
    $mailer->datasend($msg);
    $mailer->dataend;
    $mailer->quit;
    
    print "send mail to $mail\n";
    undef $mailer;

其实这个是很早的问题了，出现在Debian Sarge 3.1的版本，Linux 2.6 kernel上，特别是比较旧的SATA主板出现这个问题的几率挺大。据说testing的Etch也有这个问题，不过我一直没有碰到过。

在安装的过程中，Debian Installer会检测光驱，并且从光驱拷贝安装文件。其实挺邪门的，本来就是从光驱启动进入安装界面，但到这个步骤光驱会被重新检测一遍。然后ata-piix这个模块有BUG，所以在这步造成了CD-ROM检测不到，之后提示下面的错误：

No common CD-ROM drive was detected.
You may need to load additional CD-ROM drivers from a driver floopy, If you have such a floppy available now, put it in the drive, and continue. Otherwise, you will be given the option to manually select CD-ROM modules.

解决问题的方法也比较简单，在光盘启动出现红色Debian LOGO的时候，会有命令行提示输入命令，这个时候用expert方式进入（可以按F1查看帮助），在等到读取光驱前一步会提示选择驱动模块，然后把ata-piix这个模块去掉，基本就可以检测到光驱了。

但还有一点比较重要的需要注意，安装程序走到检测硬盘并且分区的时候，同样会出现这样一个驱动模块选择，这个时候*必须*要把ata-piix加载，否则会找不到硬盘。

如果主板真的是这么顽固，到这步都还是不行，那么下面有一篇文章可以参考：
http://www.linuxsir.org/bbs/showthread.php?s=&threadid=156776

当然，也可以尝试使用netinst.iso来安装。不过这个方法我没用过，不一定行得通。

在Delphi中使用模式匹配

我推荐使用 pcre-5.0
你可以用BCB编译后,用Delphi调用,速度和支持的功能都是非常好的
boost 上面的性能测试,是这么说的:

http://www.boost.org/libs/regex/doc/performance.html
http://www.boost.org/libs/regex/doc/vc71-performance.html
http://www.boost.org/libs/regex/doc/gcc-performance.html

Averages
The following are the average relative scores for all the tests: the perfect regular expression library would score 1, in practice any small number (say less that 4 or 5) is pretty good.

GRETA |GRETA(non-recursive mode)| Boost |Boost + C++ locale| POSIX |PCRE
2.31619 6.14203 2.30668 1.94363 124.752 2.09365

Averages
The following are the average relative scores for all the tests: the perfect regular expression library would score 1, in practice anything less than 2 is pretty good.

Boost |Boost + C++ locale| POSIX |PCRE
1.4503 1.49124 108.372 1.56255

pcre 的得分都是非常优秀的,而且还是用纯C编写的,
很容易在Delphi中调用,
只不过,还需要一点封装

这个也不错, 可以试试
TRegExpr 0.952
http://regexpstudio.com/TRegExpr/TRegExpr.html

TPerlRegEx
http://www.regular-expressions.info/delphi.html
http://www.regular-expressions.info/download/TPerlRegEx.zip

我现在宣布对此汉化包以后的升级负责

众里寻她千百度，得来全不费工夫(原句应该是踏破铁鞋无觅处)

 

http://ppm.activestate.com/PPMPackages/zips/8xx-builds-only/Windows/
http://www.bribes.org/perl/ppmdir.html

这个很好,PPM没有的模块这里可能找到,比如DBD::Pg,PAR,GD.........