diff --git a/src/test/locale/sort-test.pl b/src/test/locale/sort-test.pl
index 7d9b8ef03406ce2b52cdd4c6c8f7bd7bdae8c539..aedfa22c88fb2243ebf39b6d3ae0da4f092e95f2 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";
-