my ($result, $headers) = $self->_call(
  'executeAnonymous',
  SOAP::Data->name(string => $code),
  $options{debug} ? SOAP::Header->name('DebuggingHeader' => \SOAP::Data->name(
  debugLevel => 'DEBUGONLY'
  ))->uri($self->uri) : (),
);

##</code><code>##

my @args = (
  'executeAnonymous'
  SOAP::Data->name(string => $code),
);

if ($options{debug}) {
  # this line should also be cleaned up somehow
  push @args, SOAP::Header->name('DebuggingHeader' => \SOAP::Data->name(debugLevel => 'DEBUGONLY'))->uri($self->uri);
}

my ($result, $headers) = $self->_call(@args);