X-Git-Url: https://git.jankratochvil.net/?a=blobdiff_plain;f=bin%2Fperlilib;h=0ee7b4705eb3ed52ff45071e6767418719773ecb;hb=029de65e3045014a7aae8aa3e0ba5be5ad430d48;hp=abe21ba24ffa07a786207507cb75dbcd3d63fc25;hpb=b09c490633bc1a1b259db15f6f9251fa6ff5dbce;p=nethome.git

diff --git a/bin/perlilib b/bin/perlilib
index abe21ba..0ee7b47 100755
--- a/bin/perlilib
+++ b/bin/perlilib
@@ -2,4 +2,27 @@
 #
 #	$Id$
 
-exec /usr/bin/perl`echo ":$PERLLIB"|sed 's/:/ -I/g'` "$@"
+exec /usr/bin/perl`echo "${PERLLIB:+:$PERLLIB}"|sed 's/:/ -I/g'` "$@"
+
+exit 0
+
+exec /usr/bin/perl -e '
+	@LIB=qw(
+		/home/short/lib/perl5/site_perl/5.6.1/i386-linux
+		/home/short/lib/perl5/site_perl/5.6.1
+		/home/short/lib/perl5/site_perl/i386-linux
+		/home/short/lib/perl5/site_perl
+		/home/short/lib/perl5/5.6.1/i386-linux
+		/home/short/lib/perl5/5.6.1
+		/home/short/lib/perl5/i386-linux
+		/home/short/lib/perl5
+		/usr/lib/perl5/5.6.1/i386-linux
+		/usr/lib/perl5/5.6.1
+		/usr/lib/perl5/site_perl/5.6.1/i386-linux
+		/usr/lib/perl5/site_perl/5.6.1
+		/usr/lib/perl5/site_perl
+		/usr/lib/perl5/vendor_perl/5.6.1/i386-linux
+		/usr/lib/perl5/vendor_perl/5.6.1
+		/usr/lib/perl5/vendor_perl
+		.);' \
+		"$@"