From f3d7f4fabd6d124ad8e323b09ebf373bfe045b4e Mon Sep 17 00:00:00 2001
From: ph10 <ph10@6239d852-aaf2-0410-a92c-79f79f948069>
Date: Wed, 19 Jul 2017 16:04:15 +0000
Subject: Code tidies for 10.30-RC1 release candidate.

git-svn-id: svn://vcs.exim.org/pcre2/code/trunk@842 6239d852-aaf2-0410-a92c-79f79f948069
---
 perltest.sh | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'perltest.sh')

diff --git a/perltest.sh b/perltest.sh
index 806a888..1a7679a 100755
--- a/perltest.sh
+++ b/perltest.sh
@@ -50,7 +50,7 @@ fi
 #   ucp                sets Perl's /u modifier
 #   utf                invoke UTF-8 functionality
 #
-# The data lines must not have any pcre2test modifiers. Unless 
+# The data lines must not have any pcre2test modifiers. Unless
 # "subject_litersl" is on the pattern, data lines are processed as
 # Perl double-quoted strings, so if they contain " $ or @ characters, these
 # have to be escaped. For this reason, all such characters in the
@@ -141,20 +141,20 @@ for (;;)
 
   chomp($pattern);
   $pattern =~ s/\s+$//;
-  
+
   # Split the pattern from the modifiers and adjust them as necessary.
 
   $pattern =~ /^\s*((.).*\2)(.*)$/s;
   $pat = $1;
   $mod = $3;
-  
+
   # The private "aftertext" modifier means "print $' afterwards".
 
   $showrest = ($mod =~ s/aftertext,?//);
-  
+
   # The "subject_literal" modifer disables escapes in subjects.
-  
-  $subject_literal = ($mod =~ s/subject_literal,?//); 
+
+  $subject_literal = ($mod =~ s/subject_literal,?//);
 
   # "allaftertext" is used by pcre2test to print remainders after captures
 
@@ -238,7 +238,7 @@ for (;;)
       $x = $_;
       }
     else
-      {     
+      {
       $x = eval "\"$_\"";   # To get escapes processed
       }
 
-- 
cgit v1.2.1