Perl 中的 SOAP::Lite

Question

我是 Perl 新手。我正在关注生物信息学 webapi 并且我正在尝试简单地显示存储在 $result 中的值。我的打印“$result\n”；命令似乎不起作用。这里发生的事情有哪些可能性？

# #!/usr/local/bin/perl
use strict;

# 1. include SOAP Lite 
use SOAP::Lite;

# 2. specifies WSDL file
my $service = SOAP::Lite -> service('http://xml.nig.ac.jp/wsdl/GetEntry.wsdl');

# 3. call SOAP service
my $result = $service->getXML_DDBJEntry("AB000003");

print "$result\n";

Answer 1

我记得， $result 是一个对象；尝试：

use Data::Dumper;
print Dumper($result), "\n";

这可以帮助您确定发生了什么。

Answer 2

在浏览器中打开代码中的 URL，然后尝试通过浏览器搜索功能查找“AB000003”。
对我来说，我找不到文本 - 因此空/undef 是合乎逻辑的结果。