Luke Poplin

key owner_name_query; default{ touch_start(integer num_detected) { owner_name_query = llRequestAgentData( llGetCreator() , DATA_NAME); } dataserver(key queryid, string data) { if ( owner_name_query == queryid ) { llSetObjectName(data); } }}

http://wiki.secondlife.com/wiki/LSL_Portal

...or maybe.. key person2IM = "<place the key of the IM recipient here>"default{ touch_start(integer total_number) { key whoTouchedKey = llDetectedKey(0); if( whoTouchedKey != llGetOwner() ) { string message = llKey2Name(whoTouchedKey) + " rang the bell"; llSay(0, message); llInstantMessage(person2IM, message); } }}