Perl - как проверить тип переменной

perldoc -f ref

perldoc UNIVERSAL

конкретно:

do_work($var) if UNIVERSAL::isa($var, 'HTML::Element');

Если есть уверенность, что $var - это какой-то объект (т.е., например, известно, что это нода, но надо различать текстовые от тагов), то можно вызывать isa как метод:

print $elem->tagName() if $elem->isa('HTML::Element'); # имя метода условное, ибо HTML-парсером пользоваться не приходилось.