#! /bin/sh

WHAT=`perl -e '$t = shift @ARGV;  $t =~ s/xdbish/dbman/;  print $t;' $0`
exec $WHAT -x ${1+"$@"}
