for @badwords {
  print "shame on you"
   if index $pass, $_ > -1;
}