taxonomy-translation-enhancer first draft

cpanfile

@@ -110,6 +110,9 @@ requires 'Module::Load';
 # To measure the time taken by requests
 requires 'Time::Monotonic';
 
+# To measure similarity between words and find possible typo
+requires 'Text::Levenshtein';
+
 on 'test' => sub {
   requires 'Test2::V0';
   requires 'Mock::Quick';

lib/ProductOpener/FoodProducts.pm

@@ -58,7 +58,6 @@ use ProductOpener::FoodGroups qw/compute_food_groups/;
 use ProductOpener::Nutriscore qw/:all/;
 use ProductOpener::EnvironmentalScore qw/compute_environmental_score/;
 use ProductOpener::ForestFootprint qw/compute_forest_footprint/;
-use ProductOpener::TaxonomiesEnhancer qw/detect_taxonomy_translation_from_text/;
 
 use Log::Any qw($log);
 
@@ -84,7 +83,6 @@ sub specific_processes_for_food_product ($product_ref) {
 	extract_ingredients_from_text($product_ref);
 	extract_additives_from_text($product_ref);
 	detect_allergens_from_text($product_ref);
-    detect_taxonomy_translation_from_text($product_ref);
 
 	# Category analysis
 	# Food category rules for sweetened/sugared beverages

lib/ProductOpener/Products.pm

@@ -146,6 +146,7 @@ use ProductOpener::Units qw/normalize_product_quantity_and_serving_size/;
 # may be moved to another module at some point
 use ProductOpener::Packaging qw/analyze_and_combine_packaging_data/;
 use ProductOpener::DataQuality qw/check_quality/;
+use ProductOpener::TaxonomiesEnhancer qw/check_ingredients_between_languages/;
 
 # Specific to the product type
 use ProductOpener::FoodProducts qw/specific_processes_for_food_product/;
@@ -3692,6 +3693,10 @@ sub analyze_and_enrich_product_data ($product_ref, $response_ref) {
 
 	ProductOpener::DataQuality::check_quality($product_ref);
 
+	if (defined $taxonomy_fields{'ingredients'}) {
+		check_ingredients_between_languages($product_ref);
+	}
+
 	# Sort misc_tags in order to have a consistent order
 	if (defined $product_ref->{misc_tags}) {
 		$product_ref->{misc_tags} = [sort @{$product_ref->{misc_tags}}];