Global thing_to_examine;

[ UnknownVerb thing;
  objectloop ( thing provides name) {
    if (TestScope(thing, player) && Refers(thing, 1)) {
      thing_to_examine = thing;
      return 'unknown';
    };
  };
  rfalse;
];

[ ExamineObjectSub;
  << Examine (thing_to_examine) >>;
];

verb 'unknown' * -> ExamineObject;