質問
私は働き続けるのは、時代遅れ 生命情報book びんを使用しようとしているのに、XML::スマートモジュールです。
このモジュールの方法に変化してきましたが、6年間の私の未熟なperlにトラブルシューティングから cpan源.のコメントアウトされていコードを証明するものncbi.gov クエリ機能をうまく、新手法では解析のたコンポーネントです。なぜですか?よろしく!
更新 具体的にはっ走るトラブルと解析および表示するIdの配列: my @Id = $results->{eSearchResult}{IdList}{Id}{'@'};
いることにOSXターミナルと思いますか他のIdをかけることを記述します。私は適切な数です。よろしく!
#!/usr/local/bin/perl
# use lib "/Users/fogonthedowns/myperllib";
# use LWP::Simple;
use XML::Smart;
use strict;
#Set base URL for all eutils
my $utils = "http://eutils.ncbi.nlm.nih.gov/entrez/eutils";
my $db = "Pubmed";
my $query ="Cancer+Prostate";
my $retmax = 10;
my $esearch = "$utils/esearch.fcgi?" .
"db=$db&retmax=$retmax&term=";
# my $esearch_result = get($esearch.$query);
# print "ESEARCH RESULT: $esearch_result\n";
# print "Using Query: \n$esearch$query\n";
# print "hello world\n";
my $results = XML::Smart->new($esearch.$query,"XML::Parser");
my $count = $results->{eSearchResult}{Count};
my @Id = $results->{eSearchResult}{IdList}{Id}{'@'};
my $all_Id = join("\n", @Id);
print "Count = $count\n";
print "$all_Id\n";
解決
て最初にすることで間違いをコメントアウト use strict
, の利用 -w
の代わりに use warnings
.
厳しいが、perlの報告:
Bareword"XML::パーサー"はが"厳しい曲"を使用tmp:test.pl 19.
このディスプレイに微量の問題は起こっていることがわかります。
の 事例を含ん この二つ目の引数のパーサを使うに引用すること、すな引用されます。
してご利用いただいてきました:
my $results = XML::Smart->new($esearch.$query,"XML::Parser");
---として走行します。
(ちなみに、言語と呼ばれ "Perlのではないが、"perl"または"PERL")
他のヒント
変更:
my @Id = $results->{eSearchResult}{IdList}{Id}{'@'};
:
my @Id = $results->{eSearchResult}{IdList}{Id}('@');
所属していません StackOverflow