Callback/Events.pm : optimization