[Bio] / Clearinghouse / test_feature_registration.pl Repository:
ViewVC logotype

View of /Clearinghouse/test_feature_registration.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (download) (as text) (annotate)
Fri Apr 29 19:57:37 2005 UTC (14 years, 5 months ago) by disz
Branch: MAIN
CVS Tags: myrast_33, HEAD
Changes since 1.1: +1 -1 lines
Fixed feature registration

#!/usr/bin/env perl

use SOAP::Lite;
use CH_Config;

my $proxy = SOAP::Lite-> uri('http://www.soaplite.com/Scripts') -> proxy($CH_Config::service_url);


$response = $proxy->register_feature("666.8", "peg", 6);  

if ($response->fault)
    {
        die "Failed to register: ", $response->faultcode, " ", $response->faultstring, "\n";
    }

print "Result = ", $response->result;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3