Select Code to Download

#####################3 server.pl
use strict;
...
);

$loop->loop_forever();

######################## client.pl
use strict;
...
    warn sprintf 'TIME TO READ FROM SERVER %s: ELAPSED: %s GOT: %s', T
+ime::HiRes::time - $recv_start, time - $time, $buffer;
}