1 files changed, 6 insertions, 1 deletions
diff --git a/tests/sort/Test.pm b/tests/sort/Test.pm
index cccbe209d..bf2729f03 100755
--- a/tests/sort/Test.pm
+++ b/tests/sort/Test.pm
@@ -3,7 +3,7 @@ package Test;
 require 5.002;
 use strict;
 
-@Test::t = (
+my @tv = (
 #test   options   input   expected-output   expected-return-code
 #
 ["01a", '', "A\nB\nC\n", "A\nB\nC\n", 0],
@@ -151,4 +151,9 @@ use strict;
 
 );
 
+sub test_vector
+{
+  return @tv;
+}
+
 1;