Расширение запроса в Perl

Question

Существует ли какая-либо существующая реализация для расширения запросов в Perl?Под расширением запроса я подразумеваю, что когда пользователь вводит запрос в нашей базе данных, он расширяет поиск на основе связанных терминов.

В принципе у нас есть файл XML (например, MESH ), с помощью которогомы хотим обратиться за расширением запроса.

Answer 1

Bio :: DB :: MeSH - Срок поиска из базы данных Web MeSH

my $mesh = Bio::DB::MeSH->new();
my $term = $mesh->get_exact_term('Butter');
print $term->description;

Answer 2

Вы уже получили исправный ответ, но есть более глубокая и надежная альтернатива для более серьезного использования: UMLS :: Similarity и UMLS :: Interface .Проблема в том, что они немного сложны для установки, требуют MySQL, занимают немного места на диске и требуют, чтобы у вас был материал MeSH локально, и убедитесь, что ваше использование соответствует паре дюжин связанных лицензий длясловари / источники.

Я не хочу унижать Bio :: DB :: MeSH , это полезно и является частью более широкой картины ( BioPerl ), ноу него хрупкая эвристика и он зависит от доступности и тривиальных изменений HTML на целевом / исходном сайте (он был сломан, когда я в последний раз использовал его, например, хотя его было легко локально патчить).