in reply to writing perl function like sql IN

Thanks very much to everyone!