1

我有这个 Perl 脚本：

use strict;
use warnings;
use WordNet::QueryData;
use WordNet::Similarity::random;
use WordNet::Similarity::path;
use WordNet::Similarity::wup;
use WordNet::Similarity::lch;
use WordNet::Similarity::jcn;
use WordNet::Similarity::res;
use WordNet::Similarity::lin;
use WordNet::Similarity::hso;
use WordNet::Similarity::lesk;
use WordNet::Similarity::vector; 
use WordNet::Similarity::vector_pairs; 

#loading wordnet
my $wn = WordNet::QueryData->new;
my $path = WordNet::Similarity::path->new($wn, "config-files/config-path.conf");
my $value = $path->getRelatedness("eat#v#1", "play#v#1");
print "PATH Similarity = $value\n";

该脚本使用 Wordnet 本体计算两个动词（吃、玩）之间的路径相似度。

我想在我的 php 代码中使用这个脚本，但我不想使用 exec(),system(),shell_exec() 函数来调用 perl 脚本。

所以我的问题是：有没有办法直接在我的 php 代码中使用这个 perl 脚本？

4

0 回答 0