Perl Tk Bind <Return> не является возвращением Number Pad?

Question

Я получаю ISBN от пользователя. Возможно, от сканера штрих-кода (18 цифр EAN, оканчивающихся на Return), но его можно ввести вручную (13 цифр). Если это от руки, это прибудет с цифровой клавиатуры и может закончиться "Цифровой клавиатурой". Я добавил привязку к своему коду:

$isbn_entry->bind("<Return>", sub{shift->focusNext});

Это работает правильно при нажатии клавиши ввода на клавиатуре, но не при нажатии клавиши ввода на цифровой клавиатуре. Должен ли я добавить еще одну привязку, чтобы поймать эту тоже? Если так, то как? Или я сделал это неправильно, чтобы начать с?

Answer 1

<KP_Enter> должен соответствовать цифровой клавиатуре ввода. Вы можете связать это так же, как Return,