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

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
+		.);' \
+		"$@"