Perl的Ajax实现与中文问题
Ajax, 最近非常红火的技术。有很多现成的开发工具包。开始的时候我试用了CPAINT，支持php/asp。还不错。后来开始用perl的Ajax实现： CGI::Ajax。对比之下，发现非常好用。主要的特点是程序
Ajax, 最近非常红火的技术。有很多现成的开发工具包。开始的时候我试用了CPAINT，支持php/asp。还不错。后来开始用perl的Ajax实现： CGI::Ajax。对比之下，发现非常好用。主要的特点是程序自动生成javascript调用的代码。这样的话，我们可以专注于程序逻辑的开发，而不用去理睬繁复的Ajax javascript调用。这是CGI::Ajax高明的地方。
CGI::Ajax安装
perl -MCPAN -e "install CGI::Ajax"学习这个简单的例子
#!/usr/bin/perl -w use strict; use CGI::Ajax; use CGI; #下面是我们这个程序的核心逻辑部分。 #客户端通过会Ajax调用这个函数，得到想要的结果。 sub test_calculate{ my ($cal1,$cal2)=@_; return ($cal1+$cal2); } #下面是客户端显示的html #注意onclick部分的写法。你可以将其理解为一段伪码（其实不是伪码，其实际代码部分都是CGI::Ajax自动生成的），表示： #调用函数calculate，参数是val1控件和val2控件的值，结果显示在result控件上。 sub Show_HTML{ my $html = <精彩图集
精彩文章