Some installations of perl seem very picky about their regexps.

diff --git a/globals.pl b/globals.pl
index b924831b88d7616f1d70f92e14b072625370f364..439e36cea2a0945ff379055f963f9e0b2a7c2d0e 100644 (file)
--- a/globals.pl
+++ b/globals.pl
@@ -513,8 +513,8 @@ sub PerformSubsts {
 
 sub trim {
     ($_) = (@_);
-    s/^\s*//g;
-    s/\s*$//g;
+    s/^\s+//g;
+    s/\s+$//g;
     return $_;
 }