Perl机械化输出难度

Question

我还有一个问题要问。这是我的代码，请访问网站并告诉我如何从我的代码中获取excel文件。这个打印命令给我一个html页面，但我想要excel链接。

   use strict;
   use warnings;

   use WWW::Mechanize;
   use WWW::Mechanize::FormFiller;
   use autodie qw/ open close /;
   use 5.012;

   my $browser =  WWW::Mechanize->new(autocheck => 1);
   my $formfiller = WWW::Mechanize::FormFiller->new();
   my $snp = "rs111";

   $browser->get("http://snp-nexus.org/index.html");

   $browser->form_name ('snpnexus');

   $browser->select('query', 'Single Query-dbSNP rs #');
   $browser->field("dbSNP rs#", $snp);
   $browser->tick('ensembl'=> "ensembl");
   $browser->tick('refseq'=> 'refseq');
   $browser->tick("sift"=>'sift');
   $browser->tick("mirbase" =>'mirbase');
   $browser->tick('gad'=> 'gad');
   $browser->tick('cnp' => 'cnp' );
   my $response= $browser->submit('snpnexus','Run');
   print $response-> content();