blob: fa0e427c035c36ac94bf18e31a832beb3688fac9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
#!/pkg/gnu/bin/perl
#
# Usage: server <switches>
# -u : use IOR
# -f m : output results in Mbps
# -b <sock Q size> ** not implemented **
# -ORBhost <host name> ************* must provide this for this version
# -OAthread : use threaded version as opposed to reactive
#
$HOSTNAME = shift (@ARGV);
system ("server -d 1 -f m -o ior -ORBhost $HOSTNAME -ORBdotteddecimaladdresses 1 -ORBobjrefstyle url");
|
