Changeset 38610 for lang

Show
Ignore:
Timestamp:
10/21/10 11:01:14 (4 years ago)
Author:
mumumu
Message:

- supressed the "Use of uniitialized value in string" error.
-- Use of uninitialized value in string eq at module/Tools/HTTPClient.pm line 424

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/tiarra/trunk/module/Tools/HTTPClient.pm

    r12479 r38610  
    422422    { 
    423423      my $st = $this->{parser}->object->{StreamState}; 
    424       $success = $st =~ /^(?:body|parsed)\z/ && $this->{parser}{rest} eq ''; 
     424      $success = $st =~ /^(?:body|parsed)\z/ && defined($this->{parser}{rest}) && $this->{parser}{rest} eq ''; 
    425425    }else 
    426426    {