Skip Menu |

This queue is for tickets about the SOAP-Lite CPAN distribution.

Report information
The Basics
Id: 17712
Status: resolved
Priority: 0/
Queue: SOAP-Lite

People
Owner: Nobody in particular
Requestors: cpan [...] clotho.com
Cc:
AdminCc:

Bug Information
Severity: Unimportant
Broken in: 0.67
Fixed in: (no value)



Subject: Warning about undefined $self->request->header("Expect")
I am getting this warning: Use of uninitialized value in string eq at /Users/chris/perl/lib/perl5/site_perl/SOAP/Transport/HTTP.pm line 314. That line is: if ($self->request->header("Expect") eq "100-Continue") { It probably should be: my $expect = $self->request->header("Expect"); if (defined $expect && $expect eq "100-Continue") { -- Chris
Here's a related error. This also generates a warning if $ENV{EXPECT} is undef. Line 408 of SOAP/Transport/HTTP.pm (v0.67) if ($ENV{EXPECT} =~ /\b100-Continue\b/i) { should be if ($ENV{EXPECT} && $ENV{EXPECT} =~ /\b100-Continue\b/i) { Chris
From: cdolan [...] cpan.org
Oops, sorry, those line numbers were from SOAP::Lite v0.67. The correct line numbers are: Line 315: if ($self->request->header("Expect") eq "100-Continue") { Line 410: if ($ENV{EXPECT} =~ /\b100-Continue\b/i) { Line 548: if ($r->header_in('Expect') =~ /\b100-Continue\b/i) { -- Chris
Hi, this is fixed in 0.71 (and probably before). Thanks for reporting, Martin