Return to perl_to_chroot CVS log

Up to [local] / openbsd / fill_chroot

Annotation of openbsd/fill_chroot/perl_to_chroot, Revision 1.2

1.1       andrew      1: #!/bin/sh
1.2     ! andrew      2: # $RedRiver: perl_to_chroot,v 1.1 2005/12/21 18:04:06 andrew Exp $
1.1       andrew      3:
                      4: PERLLIBS=`ldd /usr/bin/perl | cut -d ' ' -f 7 | sed -e 's/:$//'`
1.2     ! andrew      5: CHROOT=${CHROOT:=/home/andrew/www}
1.1       andrew      6:
1.2     ! andrew      7: for f in ${PERLLIBS} /usr/libdata/perl5 /usr/local/libdata/perl5; do
1.1       andrew      8:   DESTDIR=${CHROOT}`dirname ${f}`
                      9:
                     10:   if [ ! -d ${DESTDIR} ]; then
                     11:     echo mkdir -p ${DESTDIR}
                     12:     mkdir -p ${DESTDIR}
                     13:   fi
                     14:
                     15:   RECURSE=
                     16:   if [ -d ${f} ]; then
                     17:     RECURSE=-r
                     18:   fi
                     19:
                     20:   echo cp ${RECURSE} ${f} ${DESTDIR}
                     21:   cp ${RECURSE} ${f} ${DESTDIR}
                     22:
                     23: done