$line=~/$_/i&&push(@found,$_)for@keywords;