Я новичок в 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";
Насколько я помню, $result - это объект;Попробуйте:
$result
use Data::Dumper; print Dumper($result), "\n";
Это может помочь вам определить, что происходит.
Откройте URL-адрес из своего кода в браузере и попробуйте найти «AB000003» с помощью функции поиска в браузере. Для меня я не могу найти текст - таким образом, пустой / undef является логическим результатом.