在 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 => 'https://stackoverflow.com/questions/50956597'})->res->body;