每一种技术都有其诱人之处。
发布时间：2014-07-02 17:17:40
Perl DBI 提供对宽字符串支持的接口：use DBI qw(neat data_diff data_string_desc);其中data_string_desc 可以查看一个字符串编码方式：data_string_desc($str);#返回的信息描述可能是：“UTF8 off, ASCII, 42 characters 42 bytesUTF8 off, non-ASCII, 42 characters 42 bytesUTF8 on, non-ASCII.........【阅读全文】
发布时间：2014-06-24 15:22:07
wperl.exe 为后台运行script 执行档，此时执行的script所抛出的任何打印信息都不会输出到控制台。类似linux 下nohup ，此时需把stdout stderror 重定向到某个文件中，EX: wperl.exe xxx.pl > xxx.log 2>&1......【阅读全文】
发布时间：2014-06-03 17:23:30
# Functional style use Digest::MD5 qw(md5 md5_hex md5_base64); $digest = md5($data); $digest = md5_hex($data); $digest = md5_base64($data); # OO style.........【阅读全文】
发布时间：2014-06-03 15:30:53
#!/usr/bin/perluse strict;use Switch; my $val = "haha";my %hash = ("haha" => "weibiao");my @array;switch ($val) { case 1 { print "number 1" } &nbs.........【阅读全文】
发布时间：2014-06-03 14:09:18
ActivePerl DBI Pacage : "DBD-mysql" http://search.cpan.org/dist/DBD-mysql-4.022/#使用DBI 包use DBI；#连接databasemy $db = DBI->connect("DBI:mysql:$database:$hostname:$port",$user,$pw,{'RaiseError'=>1});#第三个参数指错误信息输出的\1#关闭连接$db->disconnect();.........【阅读全文】
