$fields[6] = '"KBBM"';

if (@fields[6] =~ ('"KOTB"' or '"KBBA"' or '"KBBC"' or '"KBBM"' or '"KBBT"')) {
  print "Inside the Check"
}