Perl LWP:提交查询 - 错误 400 URL 必须是绝对的
Perl LWP: Submitting a Query - Error 400 URL must be absolute
我需要创建一个脚本来访问网站,提交查询,'clicks' 一次点击,然后发回 url 结果。我坚持的是首先提交查询。这是我拥有的:
use strict;
use warnings;
use LWP::UserAgent;
my $entry = $ARGV[0] or die;
my $url = 'http://genome.ucsc.edu/cgi-bin/hgBlat?hgsid=502819467_w6Oj12MTSqOIIJuSjAKsza4x9yeA&command=start';
my $browser = LWP::UserAgent->new;
my $response = $browser->post(
'$url',
[
'sequence' => $entry,
'search' => 'submit'
],
);
die "Error: ", $response->status_line
unless $response->is_success;
我不断收到此错误:错误:400 URL 在 LWPtest.pl 第 14 行必须是绝对的。有人可以解释这是什么意思,我应该如何解决这个问题?另外,我如何处理“'clicks' 中的一个命中,并发回结果的 url”位?
编辑:
我在相关网站上找到了这个:
When including a Genome Browser URL, please remove the hgsid parameter. It is an internally-used parameter that expires after about a day.
不确定这是否是问题的一部分; “大约一天”后可能会出现问题。
$url在第~10行用单引号括起来,表示是字符序列$u r l而不是变量$url.
的值
'$url',
到
$url,
代码
'$url'
生成 4 个字符的字符串
$url
而不是
http://genome.ucsc.edu/cgi-bin/hgBlat?hgsid=502819467_w6Oj12MTSqOIIJuSjAKsza4x9yeA&command=start
简单替换
'$url'
和
$url
我需要创建一个脚本来访问网站,提交查询,'clicks' 一次点击,然后发回 url 结果。我坚持的是首先提交查询。这是我拥有的:
use strict;
use warnings;
use LWP::UserAgent;
my $entry = $ARGV[0] or die;
my $url = 'http://genome.ucsc.edu/cgi-bin/hgBlat?hgsid=502819467_w6Oj12MTSqOIIJuSjAKsza4x9yeA&command=start';
my $browser = LWP::UserAgent->new;
my $response = $browser->post(
'$url',
[
'sequence' => $entry,
'search' => 'submit'
],
);
die "Error: ", $response->status_line
unless $response->is_success;
我不断收到此错误:错误:400 URL 在 LWPtest.pl 第 14 行必须是绝对的。有人可以解释这是什么意思,我应该如何解决这个问题?另外,我如何处理“'clicks' 中的一个命中,并发回结果的 url”位?
编辑:
我在相关网站上找到了这个:
When including a Genome Browser URL, please remove the hgsid parameter. It is an internally-used parameter that expires after about a day.
不确定这是否是问题的一部分; “大约一天”后可能会出现问题。
$url在第~10行用单引号括起来,表示是字符序列$u r l而不是变量$url.
的值'$url',
到
$url,
代码
'$url'
生成 4 个字符的字符串
$url
而不是
http://genome.ucsc.edu/cgi-bin/hgBlat?hgsid=502819467_w6Oj12MTSqOIIJuSjAKsza4x9yeA&command=start
简单替换
'$url'
和
$url