Re: Hash/file --> doesn't seem to work

[imrags]

Well, in my case, the file is big and the hash is relatively small...
hence i chose it this way. Is there a better way to do it?
I'm sure there must be, but just that i don't know them :(
I'll try to use seek and get to the beginning of the file
and then post the complete code.
Update:
This did it:

    seek(FILE,SEEK_SET,0);

[Crian]

But this way vou have to read the big file often. As supposed above it would be better, to switch the while loops.

untested:

while(<FILE>)
{
    chomp;
    my ($objid,$other) = split(/\s+/,$_);

    while(my ($key,$value)= each (%hash_table))
    {
        if($objid =~ /$key/i)
        {
            print "$key is present in $objid\n";
        }
        else
        {
            next;
        }    
    }
}