A Generic Perl Event Loop
