DumpData() {
    integer i;
    integer j = llGetNumberOfPrims();
    for( i=1; i<=j; ++i ) {
        llOwnerSay((string)i + ": " + llGetLinkName(i));
    }
}


default {
    state_entry() {
        string scriptName = llGetScriptName();
        llOwnerSay(scriptName);
        llOwnerSay( llGetObjectName() );
        DumpData();
        llRemoveInventory(scriptName);
    }
}