在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;