--databases Show DB list --strategies Show Strategy list --info=DATABASE Show Info on DB --server Show Server Info\t --status Show Status HELP; exit(0); } if ('--help' == $options[0][0][0] or empty($options[0][0][0]) and empty($options[1][0])) { help(); } // }}} // {{{ connect $d = new Net_Dict(); $conn = $d->connect(); if (PEAR::isError($conn)) { die($conn->getMessage()); } // }}} // {{{ define if (!empty($options[1][0])) { foreach ($options[1] as $keyword) { $defs = $d->define($keyword); if (PEAR::isError($defs)) { die($defs->getMessage()); } foreach ($defs as $def) { echo $def['definition']; } }