default
{
    state_entry()
    {
        list dets = llGetObjectDetails(llGetKey(),[OBJECT_GROUP]);
        key uuid = llList2Key(dets,0);
        llHTTPRequest("http://world.secondlife.com/group/"+(string)uuid,[],"");
   }

    http_response(key id, integer status, list data, string body)
    {
        list parsed = llParseString2List(body,["<title>","</title>"],[]);
        string groupname = llList2String(parsed,1);
        llSay(0,groupname);
    }
}