[BACK]Return to perl_to_chroot CVS log [TXT][DIR] Up to [local] / openbsd / fill_chroot
File: [local] / openbsd / fill_chroot / Attic / perl_to_chroot (download)

Revision 1.2, Wed Dec 21 18:06:32 2005 UTC (18 years, 6 months ago) by andrew
Branch: MAIN
Changes since 1.1: +3 -4 lines 

chroot now can be overridden with an environment variable.

#!/bin/sh
# $RedRiver: perl_to_chroot,v 1.1 2005/12/21 18:04:06 andrew Exp $

PERLLIBS=`ldd /usr/bin/perl | cut -d ' ' -f 7 | sed -e 's/:$//'`
CHROOT=${CHROOT:=/home/andrew/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}

done