@@ -98,7 +98,7 @@ foreach my $file ( readdir(Q) ) { | |||
print "\t\tlanguage and dictionary detection\n"; | |||
my($lang,$words, $dictmatches) = detect_lang($txt); | |||
print "\t\tfound %dictmatches words in dictionary\n"; | |||
print "\t\tfound $dictmatches words in dictionary\n"; | |||
push @res, { | |||
lang => $lang, |