my $object = Object->new();

  POE::Session->create(
    object_states => [
			$object => {
				_start => "handle_start",
				tick => "handle_tick",
				tock => "handle_tock",
			},
		],
	);