使用Perl中的soap接口完成分布调用,需要apache正常配置启动:
use SOAP::Lite;
use SOAP::Lite +trace=>'all';#打开追踪排查日志
my $s = SOAP::Lite
->uri("NetWork")#定义调用方法
->proxy('http://192.168.1.3:4000/cgi-bin/NetWork.cgi')#http调用cgi程序
->NetWork('test','20110830125030')#方法参数
->result;
print "#####$s\n";
正常情况下返回为0,可以去1.3看看是否进程已经起来啦~~