I want to check if a word from a very large list of words exists in the first column of a (very large again) tab delimited text file, and if so to use some of the other columns from the latter to perform some actions on the former.
I got it to work, and then optimized my code the best I could to make it quicker. Still, I'm pretty sure it could be done in a more efficient way that I can't think of, as there is a bottleneck when looping through the tab delimited text file.
Here is the function I use to go through it and check if the word exists in it :
my @lexiks = split/\t/, $_;
my $motlexique = $lexiks;
my $genre = $lexiks;
my $nombre = $lexiks;
if ($motlexique eq $thewordimsearching)
#Do some things here
Could you guide me a bit here ? Please keep in mind that I'm self-taught and not-so experienced with Perl.