1 files changed, 12 insertions, 0 deletions
diff --git a/perl-install/live_install2 b/perl-install/live_install2
new file mode 100755
index 000000000..0773636ea
--- /dev/null
+++ b/perl-install/live_install2
@@ -0,0 +1,12 @@
+#!../perl
+
+my $dir = `pwd`;
+chomp $dir;
+$dir .= "/../../..";
+
+$ENV{PERL5LIB} = join ":", map { "$dir/$_" } @INC;
+$ENV{LD_LIBRARY_PATH} = "$dir/lib:$dir/usr/lib";
+$ENV{PATH} = join(":", map { "$dir/$_" } split ":", "/usr/bin:/bin:/sbin:/usr/sbin:/usr/X11R6/bin") . ":$ENV{PATH}";
+$ENV{SHARE_PATH} = "$dir/usr/share";
+
+exec "../../../lib/ld-linux.so.2", "../perl", "./install2", "--live", @ARGV or die;