#!/bin/sh
# $RedRiver: perl_to_chroot,v 1.6 2008/09/12 23:07:59 andrew Exp $

CHROOT=${CHROOT:=/var/www}

for f in /usr/bin/perl \
	`find_depends /usr/bin/perl` \
        /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