ajax, 最近非常红火的技术。有很多现成的开发工具包。开始的时候我试用了cpaint,支持php/asp。还不错。后来开始用perl的ajax实现: cgi::ajax。对比之下,发现非常好用。主要的特点是程序自动生成javascript调用的代码。这样的话,我们可以专注于程序逻辑的开发,而不用去理睬繁复的ajax javascript调用。这是cgi::ajax高明的地方。
perl -mcpan -e "install cgi::ajax" 【相关文章:第三层交换建设企业VLAN】cgi::ajax安装 【扩展阅读:TMIS网络瞩目3Com第三层交换解决方】
【扩展信息:第3/4层交换路由技术构建宽带多媒体网】学习这个简单的例子
#!/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 = <<eohtml; <html> <head> <title>test</title> </head> <body> <input type=text name=val1 id=val1> <input type=text name=val2 id=val2> <input type=button name=cal id=cal value=cal it onclick="calculate([val1,val2],[result]);return true;"><br> <div id=result></div> </body> </html> eohtml return $html; } my $cgi=new cgi(); # 这里的代码将刚才提到的伪码calculate与我们的perl实现函数关联起来。... 下一页