使用 WWW::Mechanize,如何添加带下划线的小写 header?

Using WWW::Mechanize, how do I add a lower case header with an underscore?

我使用的 API 要求我使用名为 "m_id" 的 header 请求。

当我使用

$mech->add_header('m_id' => 'whatever')

WWW::Mechanize(或者更确切地说 HTTP::Headers)“有帮助地”将 header 名称更改为“M-Id”。哪个不行。

有什么办法可以防止这种情况发生吗?

我以为我在发帖前就进行了 RTFM,但还不够好... 第二次阅读 HTTP::Headers perldoc 告诉我使用:

$mech->add_header(':m_id'=>'whatever');

这就是诀窍。