当使用LWP::UserAgent
中的HTTP::Request
指定包含下划线的自定义头时,下划线会被改为连字符:
use LWP::UserAgent;
my $rq = HTTP::Request->new("GET", "http://cpan.org");
$rq->header("X-FOO_BAR", "xyzzy");
print $rq->as_string;
输出:
GET http://cpan.org
X-FOO-BAR: xyzzy
有没有一种方法可以关闭这种行为?
- perl v5.26.2
- LWP:UserAgent 1.9601
- linux 4.17.8-1-ARCH