如何使用Perl的LWP提取非標准HTTP頭？

Question

我正在使用一個Web應用程序，它在響應登錄請求時發送一些非標准HTTP頭。 有問題的標題是：

SSO_STATUS: LoginFailed

我嘗試用LWP :: Response作為$response->header('SSO_STATUS')提取它，但它不起作用。 它適用於標准標題，如Set-Cookie ， Expires等。

有沒有辦法處理原始標題？

Answer 1

如果你看到HTTP :: Headers的文檔，它就說明了這一點

標題字段名稱拼寫通常是規范化的，包括'_'到' - '的翻譯。 有一些應用，這是不合適的。 使用“：”前綴字段名稱可以強制執行特定拼寫。 例如，如果您確實希望標題字段名稱顯示為foo_bar而不是“Foo-Bar”，則可以將其設置為：

  $h->header(":foo_bar" => 1);

對於$h->header_field_names和$h->scan回調，這些字段名稱返回時帶有'：'，但是$h->as_string沒有顯示冒號。

Answer 2

您需要將頭字段的值作為$response->header('SSO-STATUS') 。

在名稱中設置帶下划線的字段的語法：
$response->header(':SSO_STATUS' => 'foo');