FUNCTION AII_GET_HOSTNAME

SPAWN,'echo $HOSTNAME',HOSTNAME
RESULT = STR_SEP( HOSTNAME[0], '.' )

RETURN, RESULT[0]
END