(List
  (Com {[LIT_CHARS echo]} {[SQ <LIT_CHARS "--- envuidgid insists on two arguments">]}  )
  (Com {[LIT_CHARS envuidgid]}  )
  (Com {[LIT_CHARS echo]} {[VarSub ?]}  )
  (Com {[LIT_CHARS envuidgid]} {[LIT_CHARS root]}  )
  (Com {[LIT_CHARS echo]} {[VarSub ?]}  )
  (Com {[LIT_CHARS echo]} {[SQ <LIT_CHARS "--- envuidgid sets UID=0 for root">]}  )
  (Com {[LIT_CHARS envuidgid]} {[LIT_CHARS root]} {[LIT_CHARS printenv]} {[LIT_CHARS UID]}  )
  (Com {[LIT_CHARS echo]} {[VarSub ?]}  )
  (Com {[LIT_CHARS echo]} {[SQ <LIT_CHARS "--- envuidgid complains if it cannot run program">]}  )
  (Com {[LIT_CHARS envuidgid]} {[LIT_CHARS root]} {[LIT_CHARS ./nonexistent]}  )
  (Com {[LIT_CHARS echo]} {[VarSub ?]}  )
)