if (grep $_ eq $j, $text->tagNames) { ... }