dpkg/run-script

#!/bin/sh

top_srcdir="`dirname $0`"

# To avoid using «readlink -f» or «realpath» we just change into the
# desired directory and work from there.
cd "$top_srcdir"
cwd="`pwd`"
cd "$OLDPWD"

# Set up the environment, to use local perl modules and data files.
export PERL5LIB="$cwd/scripts:$cwd/dselect/methods"
export DPKG_DATADIR="$cwd"

interp="$1"
script="$2"
shift 2

exec $interp "$cwd/$script" "$@"