A Perl STOMP client based on AnyEvent