Perl LibXML获取未初始化的节点值报告

Question

我尝试使用LibXML获取节点值，

返回以下日志：

Use of uninitialized value $long_name in concatenation (.) or string at validate.0.1.pl line 105, <FILEHD> line 1.
###LI### 11 node_ln is: <annotation source="Name" xml:lang="EN">TestValue</annotation> and long_name is .

脚本：

use XML::LibXML;
....
for my $node_ln ($xpc->findnodes( qq(.//xsd:annotation[\@source=\"Name\"]), $node_root)){
    my $long_name = $node_ln->nodeValue;
    print("###LI### 11 node_ln is: $node_ln and long_name is $long_name.\n");
}

现在抓住我的头来了解如何获取节点值'TestValue'，有什么建议吗？谢谢大家！