[Bio] / FigWebServices / makewsdl.pl Repository:
ViewVC logotype

View of /FigWebServices/makewsdl.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (download) (as text) (annotate)
Tue Oct 23 15:47:44 2007 UTC (12 years, 7 months ago) by disz
Branch: MAIN
generates wsdl from pod doc in fig_scripts_service.cgi

#!/usr/bin/perl

use strict;
use warnings;
use Pod::WSDL;

#my $p = new Pod::WSDL(source => 'My::makewsdl', 
#my $p = new Pod::WSDL(source => 'makewsdl', 
my $p = new Pod::WSDL(source => 'fig_scripts_service.cgi', 
	location => 'http://bioseed.mcs.anl.gov/~disz/FIG/fig_scripts_service.cgi',
	pretty => 1,
	withDocumentation => 1);
	
print $p->WSDL;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3