Event - a generic Perl event loop