// Group Name Grabber
//
// By Hippyjim Starbrook
 
// A key variable to keep track of our web requests
key httpid;
 
default
{
 
    // On touch, start the request
    touch_start(integer total_number)
    {
        // Get a list containing my group details
        list details = llGetObjectDetails(llGetKey(), [OBJECT_GROUP]);
 
        // Grab the key as a string from that list
        string groupkey = llList2String(details, 0);
 
        // Make the web request including the group key as part of the url
        httpid = llHTTPRequest("http://groupname.scriptacademy.org/" + groupkey, [HTTP_METHOD, "GET"], "");
    }
 
 
    // When the web replies, say the result
    http_response(key id, integer status, list data, string body)
    {
 
        // check the web replied ok, and that we made the request properly
        if (status == 200 && id == httpid)
        {
            // if the web replied with an X, say it's a private group
            if (body == "X")
            {
                llSay(0, "I'm in a private group");
            }
            // if not, say the group name
            else
            {
                llSay(0, "I'm in " + body);
            }
        }
    }
}

 
<?php 
 
/*
*
*  Group Name Grabber PHP script - By Hippyjim Starbrook
*
*  usage:
*
*  send a GET request with ?ky= the group key to get the name of a group with the given key
*  if the request is malformed, or the key doesn't exist, returns X
*
*/
 
$groupKey = $_GET["ky"];
 
// create a new cURL resource
$ch = curl_init();
 
// set URL and other appropriate options
curl_setopt($ch, CURLOPT_URL, "http://world.secondlife.com/group/".$groupKey);
curl_setopt($ch, CURLOPT_HEADER, false);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
 
// grab URL and pass it to the browser
$dump = curl_e xec($ch); // note the space in "curl_e xec" must be removed for it to work - only added here due to a limit in the blog software
 
// close cURL resource, and free up system resources
curl_close($ch);
 
// remove all HTML tags from the result, except the <h1> tags (which will surround our group name)
$dump = strip_tags($dump, "<h1>");
 
// if the reply doesn't include the phrase "The specified key does not exist" take the page apart
if (!strpos($dump, "The specified key does not exist"))
{
	// find the position of the phrase "Group:" in the page, as that shows the start of our group name
	$groupPos = strpos($dump, "Group:")+ 6;
	// find the closing </h1> tag immediately after "Group:" as that signifies the end of our group name
	$endPos = strpos($dump, "</h1>", $groupPos);
	// our group name is the string in between these two points
	$groupName = trim(substr($dump, $groupPos, $endPos-$groupPos));
	// output the group name
	echo $groupName;
}
// otherwise output an X
else
{
	echo "X";
}
?>