Poe-stage is a project mainly written in Perl, it's free.

POE::Stage is a set of base classes for message-driven objects. It cleanly implements standard patterns that have emerged from years of working with POE and POE::Component modules.