Add perl smartsearch (why haven't I yet?)