[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.6, Fri Sep 12 23:07:59 2008 UTC (15 years, 9 months ago) by andrew
Branch: MAIN
Changes since 1.5: +6 -2 lines 

Better looking.  really.
switch to femail instead of mini_sendmail, it is better

#!/bin/sh
# $RedRiver: perl_to_chroot,v 1.5 2006/06/29 18:44:19 andrew Exp $

PERLLIBS=`ldd /usr/bin/perl | cut -c 41- | grep ^/`
CHROOT=${CHROOT:=/var/www}

for f in /usr/bin/perl \
        ${PERLLIBS} \
        /usr/libdata/perl5 \
        /usr/local/libdata/perl5 \
        ; do

  echo pax -r -w -L -p e ${f} ${CHROOT}
  pax -r -w -L -p e ${f} ${CHROOT}

done