runtests: add missing Perl semicolon

Follow-up to f477f3efc3ec58f7effc2aa01e7f4565b12be976 #19398

Closes #19507

diff --git a/tests/getpart.pm b/tests/getpart.pm
index 2b6d2a63c4bd97202d007576121c7152ab0ede77..75eb8dfe5d57eccbdffb289f813449a6ae9c9153 100644 (file)
--- a/tests/getpart.pm
+++ b/tests/getpart.pm
@@ -229,7 +229,7 @@ sub loadtest {
 
     if(open(my $xmlh, "<", "$file")) {
         if($original) {
-            binmode $xmlh, ':crlf'
+            binmode $xmlh, ':crlf';
         }
         else {
             binmode $xmlh; # for crapage systems, use binary