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

Annotation of /Clearinghouse/clearinghouse.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1.1.1 - (view) (download) (as text)

1 : olson 1.1 use strict;
2 :    
3 :     use SOAP::Lite;
4 :     use SOAP::Transport::HTTP;
5 :     use DBrtns;
6 :    
7 :     my $ns = "http://theseed.uchicago.edu/clearinghouse";
8 :    
9 :     my $dbname = "clearinghouse";
10 :    
11 :     my $db = new DBrtns(undef, $dbname) or die;
12 :    
13 :     my $serv = new SOAP::Transport::HTTP::CGI;
14 :    
15 :     my $inst = bless('Service', { });
16 :    
17 :     $serv->dispatch_with({ $ns => $inst });
18 :     $serv->handle();
19 :    
20 :     package Service;
21 :     use strict;
22 :    
23 :     sub register_genome
24 :     {
25 :     my($self,
26 :     }
27 :    

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3