http://www.perlmonks.org?node_id=895477


in reply to Re^4: SOAP::Lite - Insecure dependency in eval while running with -T
in thread SOAP::Lite - Insecure dependency in eval while running with -T

Gah, I kept focusing on $_ being a hash key and thus not tainted

Cheap fix 

sub generate_stub {
...

    $self->{'_stub'} = $1 if $self->{'_stub'} =~ /^(.*)/;
    return $self->stub;
}

[download]
  • Comment on Re^5: SOAP::Lite - Insecure dependency in eval while running with -T
  • Download Code

In Section Seekers of Perl Wisdom