From e21b5831254730cf5d16c250a5443abf70553a5c Mon Sep 17 00:00:00 2001
From: James E Keenan <jkeenan@cpan.org>
Date: Sun, 22 Feb 2026 17:24:08 -0500
Subject: [PATCH] Avert new warning in perl-5.43.2 re escaping whitespace

We worked around these warning in 0.14, but apparently missed one.  This
was detected when checking on status of WWW-Mechanize-Shell.
---
 lib/Data/Random.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Data/Random.pm b/lib/Data/Random.pm
index f7c898e..f459471 100755
--- a/lib/Data/Random.pm
+++ b/lib/Data/Random.pm
@@ -161,7 +161,8 @@ sub rand_chars {
         elsif ( $options{'set'} =~ /^(misc|char)$/ ) {
             @charset =
               ( '#', ',',
-                qw(~ ! @ $ % ^ & * ( ) _ + = - { } | : " < > ? / . ' ; ] [ \ `)
+                qw(~ ! @ $ % ^ & * ( ) _ + = - { } | : " < > ? / . ' ; ] [ `),
+                "\\",
             );
         }