use Search::Dict;

look *FILEHANDLE, $key, $dict, $fold;

