How do I use SOAP::Lite with WCF?

[Eric Noa]

I'm just trying to get started with WCF. It sounds like it is supposed to be super simple, but using a simple API like SOAP::Lite, I am having trouble getting anything to work. There are a lot of out dated examples in the googlesphere, and I have tried many of them to no avail. So now I am trying to break down the problem to its lowest level. I created the WCF app generated by the Visual Web Developer 2008 Express template. This is its service contract:\[code\][ServiceContract]public interface IService1{ [OperationContract] string GetData(int value); [OperationContract] CompositeType GetDataUsingDataContract(CompositeType composite); // TODO: Add your service operations here}// Use a data contract as illustrated in the sample below to add composite types to service operations.[DataContract]public class CompositeType{ bool boolValue = http://stackoverflow.com/questions/12253941/true; string stringValue ="Hello "; [DataMember] public bool BoolValue { get { return boolValue; } set { boolValue = http://stackoverflow.com/questions/12253941/value; } } [DataMember] public string StringValue { get { return stringValue; } set { stringValue = value; } }}\[/code\]I started it up in debug mode and tried to make contact. Doing so with a browser using the debug url \[code\]http://localhost:59315/Service1.svc\[/code\] gives me a page saying this:\[quote\] You have created a service. To test this service, you will need to create a client and use it to call the service. You can do this using the svcutil.exe tool from the command line with the following syntax: svcutil.exe \[code\]http://localhost:59315/Service1.svc?wsdl\[/code\]\[/quote\]So, then I brows to that wsdl and get this:\[code\]<wsdl:definitions name="Service1" targetNamespace="http://tempuri.org/"> <wspolicy wsu:Id="WSHttpBinding_IService1_policy"> <wsp:ExactlyOne> <wsp:All> <sp:SymmetricBinding> <wspolicy> <sprotectionToken> <wspolicy> <sp:SecureConversationToken sp:IncludeToken="http://schemas.xmlsoap.org/ws/2005/07/securitypolicy/IncludeToken/AlwaysToRecipient"> <wspolicy> <sp:RequireDerivedKeys/> <sp:BootstrapPolicy> <wspolicy> <sp:SignedParts> <sp:Body/> <sp:Header Name="To" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="From" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="FaultTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="ReplyTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="MessageID" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="RelatesTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="Action" Namespace="http://www.w3.org/2005/08/addressing"/> </sp:SignedParts> <sp:EncryptedParts> <sp:Body/> </sp:EncryptedParts> <sp:SymmetricBinding> <wspolicy> <sprotectionToken> <wspolicy> <sp:SpnegoContextToken sp:IncludeToken="http://schemas.xmlsoap.org/ws/2005/07/securitypolicy/IncludeToken/AlwaysToRecipient"> <wspolicy> <sp:RequireDerivedKeys/> </wspolicy> </sp:SpnegoContextToken> </wspolicy> </sprotectionToken> <sp:AlgorithmSuite> <wspolicy> <sp:Basic256/> </wspolicy> </sp:AlgorithmSuite> <sp:Layout> <wspolicy> <sp:Strict/> </wspolicy> </sp:Layout> <sp:IncludeTimestamp/> <sp:EncryptSignature/> <sp:OnlySignEntireHeadersAndBody/> </wspolicy> </sp:SymmetricBinding> <sp:Wss11> <wspolicy> <sp:MustSupportRefKeyIdentifier/> <sp:MustSupportRefIssuerSerial/> <sp:MustSupportRefThumbprint/> <sp:MustSupportRefEncryptedKey/> </wspolicy> </sp:Wss11> <sp:Trust10> <wspolicy> <sp:MustSupportIssuedTokens/> <sp:RequireClientEntropy/> <sp:RequireServerEntropy/> </wspolicy> </sp:Trust10> </wspolicy> </sp:BootstrapPolicy> </wspolicy> </sp:SecureConversationToken> </wspolicy> </sprotectionToken> <sp:AlgorithmSuite> <wspolicy> <sp:Basic256/> </wspolicy> </sp:AlgorithmSuite> <sp:Layout> <wspolicy> <sp:Strict/> </wspolicy> </sp:Layout> <sp:IncludeTimestamp/> <sp:EncryptSignature/> <sp:OnlySignEntireHeadersAndBody/> </wspolicy> </sp:SymmetricBinding> <sp:Wss11> <wspolicy> <sp:MustSupportRefKeyIdentifier/> <sp:MustSupportRefIssuerSerial/> <sp:MustSupportRefThumbprint/> <sp:MustSupportRefEncryptedKey/> </wspolicy> </sp:Wss11> <sp:Trust10> <wspolicy> <sp:MustSupportIssuedTokens/> <sp:RequireClientEntropy/> <sp:RequireServerEntropy/> </wspolicy> </sp:Trust10> <wsaw:UsingAddressing/> </wsp:All> </wsp:ExactlyOne> </wspolicy> <wspolicy wsu:Id="WSHttpBinding_IService1_GetData_Input_policy"> <wsp:ExactlyOne> <wsp:All> <sp:SignedParts> <sp:Body/> <sp:Header Name="To" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="From" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="FaultTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="ReplyTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="MessageID" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="RelatesTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="Action" Namespace="http://www.w3.org/2005/08/addressing"/> </sp:SignedParts> <sp:EncryptedParts> <sp:Body/> </sp:EncryptedParts> </wsp:All> </wsp:ExactlyOne> </wspolicy> <wspolicy wsu:Id="WSHttpBinding_IService1_GetData_output_policy"> <wsp:ExactlyOne> <wsp:All> <sp:SignedParts> <sp:Body/> <sp:Header Name="To" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="From" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="FaultTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="ReplyTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="MessageID" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="RelatesTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="Action" Namespace="http://www.w3.org/2005/08/addressing"/> </sp:SignedParts> <sp:EncryptedParts> <sp:Body/> </sp:EncryptedParts> </wsp:All> </wsp:ExactlyOne> </wspolicy> <wspolicy wsu:Id="WSHttpBinding_IService1_GetDataUsingDataContract_Input_policy"> <wsp:ExactlyOne> <wsp:All> <sp:SignedParts> <sp:Body/> <sp:Header Name="To" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="From" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="FaultTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="ReplyTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="MessageID" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="RelatesTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="Action" Namespace="http://www.w3.org/2005/08/addressing"/> </sp:SignedParts> <sp:EncryptedParts> <sp:Body/> </sp:EncryptedParts> </wsp:All> </wsp:ExactlyOne> </wspolicy> <wspolicy wsu:Id="WSHttpBinding_IService1_GetDataUsingDataContract_output_policy"> <wsp:ExactlyOne> <wsp:All> <sp:SignedParts> <sp:Body/> <sp:Header Name="To" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="From" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="FaultTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="ReplyTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="MessageID" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="RelatesTo" Namespace="http://www.w3.org/2005/08/addressing"/> <sp:Header Name="Action" Namespace="http://www.w3.org/2005/08/addressing"/> </sp:SignedParts> <sp:EncryptedParts> <sp:Body/> </sp:EncryptedParts> </wsp:All> </wsp:ExactlyOne> </wspolicy> <wsdl:types> <xsd:schema targetNamespace="http://tempuri.org/Imports"> <xsd:import schemaLocation="http://localhost:59315/Service1.svc?xsd=xsd0" namespace="http://tempuri.org/"/> <xsd:import schemaLocation="http://localhost:59315/Service1.svc?xsd=xsd1" namespace="http://schemas.microsoft.com/2003/10/Serialization/"/> <xsd:import schemaLocation="http://localhost:59315/Service1.svc?xsd=xsd2" namespace="http://schemas.datacontract.org/2004/07/RossDominosService"/> </xsd:schema> </wsdl:types> <wsdl:message name="IService1_GetData_InputMessage"> <wsdlart name="parameters" element="tns:GetData"/> </wsdl:message> <wsdl:message name="IService1_GetData_OutputMessage"> <wsdlart name="parameters" element="tns:GetDataResponse"/> </wsdl:message> <wsdl:message name="IService1_GetDataUsingDataContract_InputMessage"> <wsdlart name="parameters" element="tns:GetDataUsingDataContract"/> </wsdl:message> <wsdl:message name="IService1_GetDataUsingDataContract_OutputMessage"> <wsdlart name="parameters" element="tns:GetDataUsingDataContractResponse"/> </wsdl:message> <wsdlortType name="IService1"> <wsdlperation name="GetData"> <wsdl:input wsaw:Action="http://tempuri.org/IService1/GetData" message="tns:IService1_GetData_InputMessage"/> <wsdlutput wsaw:Action="http://tempuri.org/IService1/GetDataResponse" message="tns:IService1_GetData_OutputMessage"/> </wsdlperation> <wsdlperation name="GetDataUsingDataContract"> <wsdl:input wsaw:Action="http://tempuri.org/IService1/GetDataUsingDataContract" message="tns:IService1_GetDataUsingDataContract_InputMessage"/> <wsdlutput wsaw:Action="http://tempuri.org/IService1/GetDataUsingDataContractResponse" message="tns:IService1_GetDataUsingDataContract_OutputMessage"/> </wsdlperation> </wsdlortType> <wsdl:binding name="WSHttpBinding_IService1" type="tns:IService1"> <wspolicyReference URI="#WSHttpBinding_IService1_policy"/> <soap12:binding transport="http://schemas.xmlsoap.org/soap/http"/> <wsdlperation name="GetData"> <soap12peration soapAction="http://tempuri.org/IService1/GetData" style="document"/> <wsdl:input> <wspolicyReference URI="#WSHttpBinding_IService1_GetData_Input_policy"/> <soap12:body use="literal"/> </wsdl:input> <wsdlutput> <wspolicyReference URI="#WSHttpBinding_IService1_GetData_output_policy"/> <soap12:body use="literal"/> </wsdlutput> </wsdlperation> <wsdlperation name="GetDataUsingDataContract"> <soap12peration soapAction="http://tempuri.org/IService1/GetDataUsingDataContract" style="document"/> <wsdl:input> <wspolicyReference URI="#WSHttpBinding_IService1_GetDataUsingDataContract_Input_policy"/> <soap12:body use="literal"/> </wsdl:input> <wsdlutput> <wspolicyReference URI="#WSHttpBinding_IService1_GetDataUsingDataContract_output_policy"/> <soap12:body use="literal"/> </wsdlutput> </wsdlperation> </wsdl:binding> <wsdl:service name="Service1"> <wsdlort name="WSHttpBinding_IService1" binding="tns:WSHttpBinding_IService1"> <soap12:address location="http://localhost:59315/Service1.svc"/> <wsa10:EndpointReference> <wsa10:Address>http://localhost:59315/Service1.svc</wsa10:Address> <Identity> <Dns>localhost</Dns> </Identity> </wsa10:EndpointReference> </wsdlort> </wsdl:service></wsdl:definitions>\[/code\]Nothing too crazy (other than SOAP itself)... Anyway, now I try a simple SOAP::Lite app:\[code\]#!/cygdrive/C/Perl64/bin/perl.exe -wuse strict;use warnings;use Data:umper;use SOAP::Lite +trace => [ transport => sub { my ($in) = @_; if ( ref($in) eq "HTTP::Request") { print( "REQUEST\n" . $in->content() . "\nEND REQUEST\n" ); } elsif ( ref($in) eq "HTTP::Response") { print( "RESPONSE\n" . $in->content() . "\nEND RESPONSE\n" ); }} ];my $server = 'http://localhost:59315/Service1.svc';my $url = "$server?wsdl";my $xmlns = 'http://schemas.datacontract.org/2004/07/RossDominosService';# Setup Network Connectionmy $service = SOAP::Lite ->ns( $url ) ->proxy( $server ) ->on_fault( sub { my ($soap, $res) = @_; die ref $res ? $res->faultstring() : $soap->transport()->status(), "\n"; } );;print( Dumper( $service ) );eval { print( "making request\n" ); my $response = $service->GetData( SOAP:ata->new( name => 'value', value =http://stackoverflow.com/questions/12253941/> 5 ) ); print("got response:\n$response\n" );};if ( $@ ) { print( "failed:\n**************************\n$@\n*****************************\n" );}\[/code\]Which from the debug is issuing this SOAP request:\[code\]<?xml version="1.0" encoding="UTF-8"?><soap:Envelope xmlns:namesp1="http://localhost:59315/Service1.svc?wsdl" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> <soap:Body> <namesp1:GetData> <value xsi:type="xsd:int">5</value> </namesp1:GetData> </soap:Body></soap:Envelope>\[/code\]But the response comes back with:\[code\]failed:**************************415 Unsupported Media Type*****************************\[/code\]What is going on? This is the "Hello, World!" of SOAP apps and I cant figure it out.