if ($wholeworld = $oyster)
{
	for (grep (PEARL))
	{	
		no Kill::Oyster; 
	}
};