libkeybinder seems to be what I exactly looked for. I have created simple perl bindings for it see at metacpan. This is my first XS module, so any comments are appreciated.