Loading ...
Sorry, an error occurred while loading the content.

trace option not working

Expand Messages
  • Vivian Summers
    Hi, Can someone tell me why the trace didn t work for me when I turn it on using use SOAP::Lite +trace = debug ; I d like to see the soap messages to/from
    Message 1 of 2 , Nov 25, 2003
    • 0 Attachment
      Hi, Can someone tell me why the trace didn't work for me when I turn it on using
       
      use SOAP::Lite +trace => 'debug';
       
      I'd like to see the soap messages to/from the server. I'm using 0.55 soap lite. Am I missing something?
       
      Thanks,
      vivian


      Do you Yahoo!?
      Free Pop-Up Blocker - Get it now
    • kgoess
      ... 0.55 soap lite. Am I missing something? Below is a patch you can apply to SOAP/Transport/HTTP.pm that will let you trace server-side code by doing this use
      Message 2 of 2 , Nov 26, 2003
      • 0 Attachment
        --- In soaplite@yahoogroups.com, Vivian Summers <vsummers98@y...>
        wrote:
        > I'd like to see the soap messages to/from the server. I'm using
        0.55
        soap lite. Am I missing something?

        Below is a patch you can apply to SOAP/Transport/HTTP.pm that will
        let
        you trace server-side code by doing this

        use SOAP::Lite
        #this drops the raw xml into the error log
        trace => [transport =>
        sub { print STDERR (ref $_[0] eq 'CODE' ? &{$_[0]} :
        $_[0]) }
        ];




        -- SOAP/Transport/HTTP.pm.bak Fri May 23 10:51:13 2003
        +++ SOAP/Transport/HTTP.pm Fri May 23 11:10:16 2003
        @@ -225,6 +225,8 @@
        sub handle {
        my $self = shift->new;

        + SOAP::Trace::transport(sub {$self->request->as_string} );
        +
        if ($self->request->method eq 'POST') {
        $self->action($self->request->header('SOAPAction') || undef);
        } elsif ($self->request->method eq 'M-POST') {
        @@ -294,6 +296,9 @@
        'Content-Length' => SOAP::Utils::bytelength $response),
        $response,
        ));
        +
        + SOAP::Trace::transport( sub {$self->response->as_string} );
        +
        }
      Your message has been successfully submitted and would be delivered to recipients shortly.