if (${ $package . '::' }{ $longName }) {
    $value = eval '$objectref->' . $longName . '( @args )';
  } else {
    $value = eval '$objectref->' . $shortName . '( @args )';
  }