test-wrap-argv: split out rewrap_arg

Split out the code wrapping the single argument.

tests/test-wrap-argv.pl

@@ -104,7 +104,19 @@ sub rewrap_line {
     print join(" \\\n", @env, $cmd), " \\\n";
     # We might have to split line argument values...
     for (my $i = 0; $i <= $#args; $i++) {
-        my $arg = $args[$i];
+        &rewrap_arg($args[$i]);
+
+        if ($i != $#args) {
+            print " \\\n";
+        } else {
+            print "\n";
+        }
+    }
+}
+
+sub rewrap_arg {
+    my $arg = shift;
+
     while (length($arg) > 80) {
         my $split = rindex $arg, ",", 80;
         if ($split == -1) {
@@ -125,10 +137,4 @@ sub rewrap_line {
         print $head, "\\\n";
     }
     print $arg;
-        if ($i != $#args) {
-            print " \\\n";
-        } else {
-            print "\n";
-        }
-    }
 }