my (undef, $oid) = $t->waifor('/^[0-9]+$/');