perl library for string-to-online-foldertype inference