因為在 BBS 想要用 :wq 發文章的次數不算少，剛剛就用 expect 弄起來了，只要加一行到 interact 裡面就可以：

\033:wq\r { send \030; send "\r" }

實際操作是要 <ESC> :wq <ENTER> ，會直接把文章發表，如果不想跳過發文前的確認選單，那就把最後的 \r 拿掉。