hello all i just started learnind how to use wsdl and i am very new at it. i have been working with on somepractise work and i have been trying to create a wsdl file that matches the web service i provided for a script called stock .cgi which is below. can anyone plz tell me what the wsdl file is supposed to look like as i have tried without any luck. the scripts i created are below. any help would be appreciated. thanks:)
stock.pm
#!/bin/perl
stock.pm
package Stock;
$productCode=7015RSRSC;
$date=16/11/2006;
$productQuantityPurchased=150;
$productQuantitySold=0;
productQuantityAvailable = (150 - 0); #($productQuantityPurchased - $productQuantitySold);
sub checkStockLevel {
my($productCode, $date);
shift;
$productcode = shift;
$date = shift;
if(($productCode eq "7015RSRSC") && ($date eq "16/11/2006"))
{ return " The Quantity of products remaining are $productQuantityAvailable.\n\n";
}
;
else
{ return "There are no products in stock.\n";
}
}
Stock.cgi
#!/usr/bin/perl -w
use SOAP::Transport::HTTP;
SOAP::Transport::HTTP::CGI
→ dispatch_to(‘stock’)
→ handle;