(List
  (Com {[LIT_CHARS sed]} {[LIT_CHARS -i]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "s/\\b\\w\\+.vm\\b//">]} {[LIT_CHARS /etc/hosts]}  )
  (Com {[LIT_CHARS sed]} {[LIT_CHARS -i]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS s/][\ LIT_ESCAPED_CHAR "\\\\"][LIT_CHARS bkube][\ LIT_ESCAPED_CHAR "\\\\"][LIT_CHARS b/][VarSub MY_NAME][LIT_CHARS /g]]} {[LIT_CHARS /etc/host] [LIT_LBRACE "{"] [LIT_CHARS s] [LIT_COMMA ","] [LIT_CHARS name] [LIT_RBRACE "}"]}  )
  (Com {[LIT_CHARS hostname]} {[VarSub MY_NAME]}  )
)