my $obj = $Measure->new($wn);

##</code><code>##

sub similarity {
   my ( $w1, $w2 ) = @_;
   warn "'$w1' vs '$w2'";
   return $obj->getRelatedness($w1, $w2);
}