===================================================================
RCS file: /cvs/openbsd/fill_chroot/Attic/perl_to_chroot,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- openbsd/fill_chroot/Attic/perl_to_chroot	2005/12/21 19:14:12	1.3
+++ openbsd/fill_chroot/Attic/perl_to_chroot	2006/01/16 21:03:12	1.4
@@ -1,23 +1,12 @@
 #!/bin/sh
-# $RedRiver: perl_to_chroot,v 1.2 2005/12/21 18:06:32 andrew Exp $
+# $RedRiver: perl_to_chroot,v 1.3 2005/12/21 19:14:12 andrew Exp $
 
 PERLLIBS=`ldd /usr/bin/perl | cut -d ' ' -f 7 | sed -e 's/:$//'`
 CHROOT=${CHROOT:=/var/www}
 
 for f in ${PERLLIBS} /usr/libdata/perl5 /usr/local/libdata/perl5; do
-  DESTDIR=${CHROOT}`dirname ${f}`
 
-  if [ ! -d ${DESTDIR} ]; then
-    echo mkdir -p ${DESTDIR}
-    mkdir -p ${DESTDIR}
-  fi
-
-  RECURSE=
-  if [ -d ${f} ]; then
-    RECURSE=-r
-  fi
-
-  echo cp ${RECURSE} ${f} ${DESTDIR}
-  cp ${RECURSE} ${f} ${DESTDIR}
+  echo pax -r -w -L -p e ${f} ${CHROOT}
+  pax -r -w -L -p e ${f} ${CHROOT}
 
 done