我和Perl分类的最新日记

美国yahoo内部人员文档交流使用的的twiki页面是twiki页面，但是twiki对UTF-8汉字处理不太好，导致一些莫名其妙的问题，如字体从上到下，越来越大。为了解决这个症状，本人跟踪了一下这个原因，应该是twiki的一个bug。

我们知道在firefox里面字体url转码和不转码是没有什么区别的，但是在ie6下必须要url转码，否则ie6就会成为乱码，(ie7正常)于是：
1，修改TWiki/Render.pm文件：
找到函数：

sub makeAnchorName {

在函数末尾修改返回值为：

return urlEncode($anchorName);

接着在该函数后面加上函数urlEncode：

sub urlEncode {
    my $text = shift;
    $text =~ s/([^0-9a-zA-Z-_.:~!*'\/%])/'%'.sprintf('%02x',ord($1))/ge;
    return $text;
}

2，修改TWiki.pm文件：
找到函数：

sub _make_params {

修改：

$anchor .= '#' . shift( @args );

为

$anchor .= '#' . urlEncode(shift( @args ));

即可。

这里又说Windows下的postgresql，只是个人觉得在windows下使用postgresql的人特别少，借此补充点postgres的知识供大家搜索。

以前写DBI时候，都是形式如下：

# Link Informations And New Class
my $dsn = "dbi:$DATABASE{driver_name}:database=$DATABASE{db_name};
hostname=$DATABASE{db_host};socket=$DATABASE{db_sock};
port=$DATABASE{db_port}";
$dbh     = DBI->connect($dsn, $DATABASE{db_user}, $DATABASE{db_pass},
{'RaiseError' => 1});

那些将 Perl 用作编程语言的人经常忽视了：Perl 用作命令行操作的快速而又难看的脚本编制引擎时是很有用的。通过命令行，Perl 仅用一行就可以实现大多数其它语言需要数页代码才能完成的任务。跟着 Teodor，他会教给您一些有用的示例。