Re: Processing words in a file.

[vinoth.ree]

I guess you need first word of each line from the file

use strict;
use warnings;


open FH, '<', "filename.txt" or die "Can not open file $!";

while(<FH>)
{
    my ($first_word) = $_ =~ /^(\w+)/;

    if ($first_word eq 'your string')
    {
        #Your wish.
    }
}