Find by name in inventory.

This script looks through the inventory for the first thing with a name matching the user's input. If it finds something, it gives it to the user. If not, it notifies the user.

integer FoundInventory(string str)
{
    integer found=FALSE;
    key a=llGetInventoryKey(str);
    if (a!=NULL_KEY) 
    {
        found=TRUE;
    }
    return found;
}

default
{   state_entry()
    {    
        llListen(0,"","","");
    }
    
    listen(integer ch, string nm, key id, string m)
    {
        string low_m=llToLower(m);
        if (FoundInventory(m))
        {
            llGiveInventory(id, llGetInventoryKey(m));
        }            
        else 
        {
            llSay(0,"Sorry. Could not find "+m+" in my inventory. Please check your spelling.");
        }
    }
}

Code is open source. Gassy Cat Workshop.

Does not work, it never finds the object.