Générer les méthodes à partir du WSDL grâce à l'utilitaire wsdl2perl

wsdl2perl -p Entreprise -b . http://hostname/service?wsdl

Modifier pour inclure l'authentification http basique

-> proxy('http://login:md5(login|password)@hostname/service')

Puis intérroger le service,

use EntrepriseInterfaces::entreprisesService::entreprisesPort;
use EntrepriseElements::IdentiteRequest;
my $service = EntrepriseInterfaces::entreprisesService::entreprisesPort->new();
my $params = EntrepriseElements::IdentiteRequest->new({
	 siret => '34838984200017',
});
my $result = $service->getIdentite($params);
die $result if not $result;
print $result;