diff --git a/tests/aux/ldap.pl b/tests/aux/ldap.pl
index 169d5fe..55be4d6 100755
--- a/tests/aux/ldap.pl
+++ b/tests/aux/ldap.pl
@@ -97,6 +97,8 @@ $sock->listen();
 my $sel = IO::Select->new($sock);
 my %handlers;
 
+warn "LDAP mockup started";
+
 while (my @ready = $sel->can_read) {
   foreach my $fh (@ready) {
     if ($fh == $sock) {
diff --git a/tests/aux/ykval.pl b/tests/aux/ykval.pl
index a766689..d7f2b1c 100755
--- a/tests/aux/ykval.pl
+++ b/tests/aux/ykval.pl
@@ -49,6 +49,8 @@ my $socket = new IO::Socket::INET (
   Reuse => 1
 ) or die "Oops: $! \n";
 
+warn "YKVAL mockup started on $port";
+
 while(1) {
   my $clientsocket = $socket->accept();
   my $clientdata = <$clientsocket>;