diff --git a/client/example.pl b/client/example.pl
index b39af85..491799d 100755
--- a/client/example.pl
+++ b/client/example.pl
@@ -137,7 +137,7 @@ sub take_action($$) {
 	}
 	# We unconditionally secrete this pheromone for identification
 	# by others of our kin.
-	print $socket "secrete 65536 1\r\n";
+	print $socket $state->{tick}." secrete 65536 1\r\n";
 	print $socket "\r\n";
 }