say "ok" unless index "yes", lc $str;