[Dibalamin]

Is there a perl function to check if an item is no drop?

I'm trying to have NPC's take droppable items, but return no drop items.