\n\n\n"; print_rec($obj); echo "\n\n\n\n"; } function print_rec($obj) { if (is_string($obj)) { echo "
\n$obj\n
\n"; } else { foreach ($obj as $key=>$val) { if (is_array($val) || is_object($val)) { echo "$key:\n".print_rec($val)."
\n"; } else { echo "$key: $val
\n"; } } } } ?>

Excercizing the sql method

[query: 'select source_id,description from protein limit 3'] call('sql',array('query'=>'select source_id,description from protein limit 3'),$ns); niceOut($ret); ?>

Making a deliberate error using the metallopdb method

[metal: zn][mode: first][count: -3] call('metallopdb',array('metal'=>'zn', 'mode'=>'first','count'=>-3),$ns); if (PEAR::isError($ret)) echo "
OOPS we got an error\n"; niceOut($ret); ?>

Using the metallopdb method correctly

[metal:zn][mode: random][count: 3] call('metallopdb', array('metal'=>'zn', 'mode'=>'random', 'count'=>3), $ns); niceOut($ret); ?>

Using the rssmetallopdb method

[metal: zn][mode: last][count: 3] call('rssmetallopdb', array('metal'=>'zn', 'mode'=>'last', 'count'=>3), $ns); niceOut(htmlspecialchars(base64_decode($ret))); ?> ]]>