diff memcached.t @ 50:b494fe5b12d1

Tests: add waitforfile() and waitforsocket() functions. This functions add ability to wait for external daemons to start before running tests.
author Maxim Dounin <mdounin@mdounin.ru>
date Wed, 19 Nov 2008 17:31:03 +0300
parents d68b85def521
children ec7903def1bb
line wrap: on
line diff
--- a/memcached.t
+++ b/memcached.t
@@ -63,6 +63,9 @@ EOF
 $t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8081');
 $t->run();
 
+$t->waitforsocket('127.0.0.1:8081')
+	or die "Can't start memcached";
+
 ###############################################################################
 
 my $memd = Cache::Memcached->new(servers => [ '127.0.0.1:8081' ]);