Linked Prim ID by Name

//#########################################################################################################
//
// return a link number by finding a prim with a given name
// will only return the link number of the first matching name
// returns -1 if the name is not found
//
//#########################################################################################################
//
integer getSingleLinkedPrimByName(string name)
{
    integer index=0;
    while(index<=llGetNumberOfPrims()){
        if (llGetLinkName(index)==name){
            return index;
        }
        index++;
    }
    return -1;
}

//#########################################################################################################
//
// return all link numbers for prims with a given name
// will only return the link number of the first matching name
// returns an empty list if the name is not found
//
//#########################################################################################################
//
list getAllLinkedPrimsByName(string name)
{
    list id[];
    integer index=0;
    while(index<=llGetNumberOfPrims()){
        if (llGetLinkName(index)==name){
            id+= index;
        }
        index++;
    }
    return id;
}