diff --git a/test/t/038_hnsw_sparsevec_vacuum_insert.pl b/test/t/038_hnsw_sparsevec_vacuum_insert.pl
index c06ba0f..69c57f0 100644
--- a/test/t/038_hnsw_sparsevec_vacuum_insert.pl
+++ b/test/t/038_hnsw_sparsevec_vacuum_insert.pl
@@ -20,9 +20,9 @@ for (1 .. 3)
 	{
 		my @elements;
 		my %indices;
-		for (1 .. int(rand() * 1000))
+		for (1 .. int(rand(1001)))
 		{
-			my $index = int(rand() * (100000 - 1)) + 1;
+			my $index = int(rand(100000)) + 1;
 			if (!exists($indices{$index}))
 			{
 				my $value = rand();