使用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看看是否進程已經起來啦~~