perl - 我在哪里可以在 Strawberry Perl 的配置中设置用户代理？

Question

我们这里有一个代理服务器，所有的互联网流量都通过它。命令：cpan package失败并出现以下错误：

LWP failed with code[403] message[Browserblocked]

我认为，只有特定的浏览器才能通过代理服务器，所以我需要为 cpan 设置用户代理。我可以在哪里设置？我在o conf中看不到任何类似的东西。

标签： perl

Answer 1

重写site\lib\LWP\UserAgent.pm的代码

sub _agent { "libwww-perl/$VERSION" }

对：

sub _agent { 'Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:64.0) Gecko/20100101 Firefox/64.0' }

解决了问题，但这真的是官方的解决方案吗？