G'day xtpu2,

[Disclaimer: I haven't used AnyEvent previously. The following information was gleaned from its (and AnyEvent::Intro's) documentation.]

"It is obvious that $w->recv is the culprit because if I comment out that line, the server works and outputs 'got your message' when I send a message to it. However, in that case the timer doesn't work."

This may only be part of the story, but it might help resolve the AnyEvent issue.

You're calling recv() on a time watcher when it should be called on a condition variable. Also, you'll need a send() method in your timer callback.

Here's a minimal example intended to roughly mirror the AnyEvent part of the code you posted:

#!/usr/bin/env perl -l

use strict;
use warnings;

use AnyEvent;
use AnyEvent::Strict;

print 'Start at: ', scalar localtime;

my $w_cond = AnyEvent->condvar;

my $w = AnyEvent->timer(
    after => 5,
    cb => sub {
        print 'Callback: ', scalar localtime;
        $w_cond->send;
    }   
);  

$w_cond->recv;
[download]

Output:

Start at: Wed Apr  9 12:06:50 2014
Callback: Wed Apr  9 12:06:55 2014
[download]

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.