From cde11fa3c003407fc6c4ddc427d57e588ea17d1c Mon Sep 17 00:00:00 2001
From: Andrew Dunstan <andrew@dunslane.net>
Date: Mon, 17 Jul 2017 15:35:19 -0400
Subject: [PATCH] Improve legibility of numeric literal

---
 src/test/perl/PostgresNode.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm
index 4f414c3c03..d87296af08 100644
--- a/src/test/perl/PostgresNode.pm
+++ b/src/test/perl/PostgresNode.pm
@@ -1249,7 +1249,7 @@ sub poll_query_until
 		}
 
 		# Wait 0.1 second before retrying.
-		usleep(100000);
+		usleep(100_000);
 
 		$attempts++;
 	}
-- 
2.40.0