eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
    & eval 'exec perl -S $0 $argv:q'
    if 0;

# $Id$
#
# Usage: server <switches>
# -u : use IOR
# -f m : output results in Mbps
# -b <sock Q size> ** not implemented **
#
# The first three lines above let this script run without specifying the
# full path to perl, as long as it is in the user's PATH.
# Taken from perlrun man page.

system ("server -d 1 -f m -o ior -ORBdotteddecimaladdresses 1 -ORBobjrefstyle url");
