while (<DATA>){
  if (/\bBIND\b/){
    print $_;
  }
}
__DATA__
this is a BIND sentence
I have UNBIND in this one
BIND as first word
last word is BIND