From b518b5a88cf7556734026362f9f6ed41614c3dec Mon Sep 17 00:00:00 2001
From: Yigit Sever
Date: Tue, 17 Sep 2019 21:56:38 +0300
Subject: Bug fix

---
 get_data.sh                  | 2 +-
 scripts/train_dic_creator.pl | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/get_data.sh b/get_data.sh
index 068c776..2d04678 100755
--- a/get_data.sh
+++ b/get_data.sh
@@ -40,7 +40,7 @@ echo "Unzipping wordnet data"
 
 for lang in als bul ell ita ron slv; do
         unzip -o -q "${WNET}/${lang}.zip" -d "${WNET}"
-        rm -f "${WNET}/${lang}.zip"
+        #rm -f "${WNET}/${lang}.zip"
 done
 
 rm -rf "${WNET}/ita/" # comes alongside iwn, not useful for us
diff --git a/scripts/train_dic_creator.pl b/scripts/train_dic_creator.pl
index 0a9f931..e7b1253 100755
--- a/scripts/train_dic_creator.pl
+++ b/scripts/train_dic_creator.pl
@@ -58,7 +58,7 @@ if (-e "$dict_dir/$target_lang-$source_lang.dic") {
     $file_name = "$source_lang-$target_lang.dic";
 }
 
-my $file_path = $dict_dir . $file_name;
+my $file_path = "${dict_dir}/${file_name}";
 
 local @ARGV = $file_path;
 local $^I = '.bak';
@@ -106,8 +106,8 @@ my $size = $cutoff / 2;
 my @head = @result[0..$size - 1];
 my @tail = @result[-$size..-1];
 
-my $train_file_name = "$dict_dir/$source_lang_$target_lang.train';
-my $test_file_name  = "$dict_dir/$source_lang_$target_lang.test';
+my $train_file_name = "${dict_dir}/${source_lang}_${target_lang}.train";
+my $test_file_name  = "${dict_dir}/${source_lang}_${target_lang}.test";
 
 open my $train_fh, '>', $train_file_name;
 open my $test_fh, '>', $test_file_name;
-- 
cgit v1.2.3-70-g09d2