host0 state

[nethome.git] / bin / perlilib

diff --git a/bin/perlilib b/bin/perlilib
index b0e9f9a..0ee7b47 100755 (executable)
--- a/bin/perlilib
+++ b/bin/perlilib
@@ -3,3 +3,26 @@
 #      $Id$
 
 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
+               .);' \
+               "$@"