Как присвоить переменную с помощью $expect_out в TCL/EXPECT?

Если я хочу сопоставить DEF_23с помощью следующего регулярного выражения:

expect {
    -re "DEF_\[0-9]*"
    set result $expect_out(1,string)
}

почему он говорит нет такого элемента в массиве? Как работает $expect_outи как я могу получить DEFс помощью регулярного выражения и присвоить его переменной result?