function LaunchRetriever(formobj) {
    var obj = formobj.action;
    var ent = formobj.text.value;
    var url, db;

    ent = ent.replace( /\s+$/, "" );
    if(ent == ""){
	return false;
    }

    var db = '';
    if (ent.match(/^K\d{5}/i)) { db = "ko"; }
    else if (ent.match(/^T\d{5}/i)) { db = "gn"; }
    else if (ent.match(/^M\d{5}/i)) { db = "md"; }
    else if (ent.match(/^H\d{5}/i)) { db = "ds"; }
    else if (ent.match(/^D\d{5}/i)) { db = "dr"; }
    else if (ent.match(/^C\d{5}/i)) { db = "cpd"; }
    else if (ent.match(/^G\d{5}/i)) { db = "gl"; }
    else if (ent.match(/^R\d{5}/i)) { db = "rn"; }
    else if (ent.match(/^RP\d{5}/i)) { db = "rp"; }
    else if (ent.match(/^[1-6]\.[\d\-]/i)) { db = "ec"; }
    else if (ent.match(/^br\d{5}/i)) { db = "br"; }
    else if (ent.match(/^jp\d{5}/i)) { db = "br"; }
    else if (ent.match(/^[a-z]{2,4}\d{5}/i)) { db = "path"; }
    else if (ent.match(/^[a-z]{2,4}:/i)) { db = "any"; }

    url = '';

    if( (getCookie("KeggDefaultLang") == 'ja' || getCookie("GenomeNetDefaultLang") == 'ja') && ent.charCodeAt(0) > 127){
	url = "/kegg-bin/search_brite?catalog=brite_jp.list&search_string=" + ent;
    }
    else if (db == '') {
	url = "/dbget-bin/www_bfind_sub?mode=bfind&max_hit=1000&dbkey=kegg&keywords=" + ent;
    }
    else if (db == "any") {
	url = "/dbget-bin/www_bget?" + ent;
    }
    else if (db == "path") {
	url = "/dbget-bin/show_pathway?" + ent;
    }
    else {
	url = "/dbget-bin/www_bget?" + db + ":" + ent;
    }

    if (url) {
	location.href = url;
    }
}
function getCookie(key) {
    var tmp1 = document.cookie.split("; ");
    var cnum = tmp1.length;
    for(i = 0; i < cnum; i++) {
	tmp2 = tmp1[i].split("=") ;
	if (tmp2[0] == key) {
	    return(unescape(tmp2[1]));
	}
    }
    return("");
}