diff --git a/src/test/locale/sort-test.pl b/src/test/locale/sort-test.pl
index 7d9b8ef0340..aedfa22c88f 100755
--- a/src/test/locale/sort-test.pl
+++ b/src/test/locale/sort-test.pl
@@ -1,4 +1,4 @@
-#!/usr/local/bin/perl -w
+#! /usr/bin/perl
 use locale;
 
 open(INFILE, "<$ARGV[0]");
@@ -9,4 +9,3 @@ $"="\n";
 my(@result) = sort @words;
 
 print "@result\n";
-