Re: SOAP::Lite? Erm, what the (censored) is the $som->result supposed to return?

sub SOAP::SOM::childof {
  my $self = shift;
  local $self->{_current} = $self->{_current};
  $self->match(shift) if @_;
  return wantarray ? map {o_child($_)} @{$self->{_current}}
                   : @{$self->{_current}} ? o_child($self->{_current}-
+>[0]) : undef;
}

print Dumper($som->childof('/Envelope/Body/[1]/[1]'));
[download]

Seems to give me the data. Am I really supposed to dig this low?

Jenda
XML sucks. Badly. SOAP on the other hand is the most powerfull vacuum pump ever invented.

Comment on Re: SOAP::Lite? Erm, what the (censored) is the $som->result supposed to return? Download Code