Maybe take a step back and peek at your errors?
Here's what I'd start with after a quick glance at the SOAP::Lite docs.
(absolutely untested)

  
if ($results->fault) {
  print "Problem! ".$result->faultcode.": ". 
      $result->faultstring;
  }
[download]

Something like this should be in your production code anyways.