proc aplwc_start { args } {
    global APLWC
    global spawn_id
    spawn $APLWC {*}$args
}