<commit_before>
#
# sysnset-renorm.pl
#

use WordNet::QueryData;
use WordNet::SenseKey;
use strict;

my $lempos = "run#v#2";

my $wn_dictionary_location = "/usr/share/wordnet";
my $wn = WordNet::QueryData->new($wn_dictionary_location);

my $off = $wn->offset($lempos);

my $sk = WordNet::SenseKey->new($wn_dictionary_location);
my $skey = $sk->get_sense_key($off, $lempos);

print "found the sense $skey for $lempos\n";
<commit_msg>start working out the synset for a given sense.<commit_after>#! /usr/bin/env perl
#
# synset-renorm.pl
#

use WordNet::QueryData;
use WordNet::SenseKey;
use strict;

my $wn_dictionary_location = "/usr/share/wordnet";
my $wn = WordNet::QueryData->new($wn_dictionary_location);
my $sk = WordNet::SenseKey->new($wn_dictionary_location);

my $sense_key = "run_away%2:38:00::";
my $sense_str = $sk->get_sense($sense_key);

my @synset = $wn->querySense($sense_str, "syns");
foreach (@synset)
{
	my $lempos = $_;
	my $off = $wn->offset($lempos);
	my $skey = $sk->get_sense_key($off, $lempos);
	print "found the sense $skey for $lempos\n";
}



{'fraction_non_alphanumeric': 0.17883895131086142, 'fraction_numerical': 0.0056179775280898875, 'mean_word_length': 5.852564102564102, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 13, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '5547922', 'n_tokens_mistral': 439, 'n_tokens_neox': 421, 'n_words': 89}