1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/install2 b/perl-install/install2
index 8921e5db7..b26684f9f 100755
--- a/perl-install/install2
+++ b/perl-install/install2
@@ -21,6 +21,12 @@
 use diagnostics;
 use strict;
 
+BEGIN {
+    #- for testing purpose
+    (my $f = __FILE__) =~ s|install2$|list_modules.pm|;
+    -e $f or symlink '../kernel/list_modules.pm', $f;
+}
+
 use lib qw(/usr/bin/perl-install .);
 use install2;