Select Code to Download

$MW->bind('<k>', \&CallbackSub);

$MW->bind('<Any-KeyPress>', [\&mysub, Ev('k')]);

$MW->bind('<Any-KeyPress>', sub { &mysub(Ev('k')) });