1 files changed, 1 insertions, 3 deletions
diff --git a/tests/ls/nameless-uid b/tests/ls/nameless-uid
index 49521037e..9b8139204 100755
--- a/tests/ls/nameless-uid
+++ b/tests/ls/nameless-uid
@@ -16,13 +16,11 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-: ${srcdir=.}
-. $srcdir/require-perl
-
 . "${srcdir=.}/init.sh"; path_prepend_ ../src
 print_ver_ ls
 
 require_root_
+require_perl_
 
 nameless_uid=`$PERL -e '
   foreach my $i (1000..16*1024) { getpwuid $i or (print "$i\n"), exit }