handle perl eval in key bindings