build-aux/run-script

   1 #!/bin/sh
   2
   3 set -e
   4
   5 top_srcdir="$(dirname "$0")/.."
   6
   7 # To avoid using «readlink -f» or «realpath» we just change into the
   8 # desired directory and work from there.
   9 cd "$top_srcdir"
  10 cwd="$(pwd)"
  11 cd "$OLDPWD"
  12
  13 # Set up the environment, to use local perl modules and data files.
  14 export PERL="${PERL:-perl}"
  15 export PERL5LIB="$cwd/scripts:$cwd/dselect/methods"
  16 export DPKG_DATADIR="$cwd/data"
  17
  18 script="$1"
  19 shift 1
  20
  21 exec "$PERL" "$cwd/$script" "$@"