在 Mojo::UserAgent 中设置 Referer 标头

Question

我正在编写一个程序来使用 Mojo::UserAgent

我想设置Referer标题值，但我不知道如何设置。

Perl 代码

my $ua   = Mojo::UserAgent->new();
my $data = $ua->get('https://test.com')->res->body;

print $data,"\n";

Answer 1

您可以Referer像使用Mojo::UserAgent设置任何其他请求标头一样设置标头：

my $data = $ua->get('https://test.com' => {Referer => '/sf/ask/3566961821/'})->res->body;