LWP响应JSON值为空

我尝试使用LWP和CURL（unix命令）运行GET方法来获取JSON格式的内容，我只在CURL命令中看到完整的内容，但是LWP响应显示有效的JSON，但带有空值

请求

LWP

卷曲

响应

LWP

卷曲

请帮助我了解LWP请求中缺少的内容，以获得完整的响应内容。

现在已修复

根据Header.pm，我应该使用“：”作为自定义标题字段名，如果我没有使用它，那么它将第一个字符转换为大写，因此标题将丢失

    unless ($field =~ /^:/) {
    $field =~ tr/_/-/ if $TRANSLATE_UNDERSCORE;
    my $old = $field;
    $field = lc $field;
    unless($standard_case{$field} || $self->{'::std_case'}{$field}) {
        # generate a %std_case entry for this field
        **$old =~ s/\b(\w)/\u$1/g;**
        $self->{'::std_case'}{$field} = $old;
    }
    }

参考：

谢谢：）

现在已经修好了

根据Header.pm，我应该使用“：”作为自定义标题字段名，如果我没有使用它，那么它将第一个字符转换为大写，因此标题将丢失

    unless ($field =~ /^:/) {
    $field =~ tr/_/-/ if $TRANSLATE_UNDERSCORE;
    my $old = $field;
    $field = lc $field;
    unless($standard_case{$field} || $self->{'::std_case'}{$field}) {
        # generate a %std_case entry for this field
        **$old =~ s/\b(\w)/\u$1/g;**
        $self->{'::std_case'}{$field} = $old;
    }
    }

参考：

---

谢谢：）

我忘了提一下，我还发送了一些自定义标题“x-inf-route-key”=>“GetID”，请告诉我LWP是否有不同的方式发送这些自定义标题。我忘了提一下，我还发送了一些自定义标题“x-inf-route-key”=>“GetID”，请让我知道LWP是否有不同的方式发送自定义标题。

{
    "id":"",
    "state":"",
    "category":"",
    "severity":"",}'`

  `{"id":"iersiefhsiof","state":"open","category":"App","severity":"minor",}'`

    unless ($field =~ /^:/) {
    $field =~ tr/_/-/ if $TRANSLATE_UNDERSCORE;
    my $old = $field;
    $field = lc $field;
    unless($standard_case{$field} || $self->{'::std_case'}{$field}) {
        # generate a %std_case entry for this field
        **$old =~ s/\b(\w)/\u$1/g;**
        $self->{'::std_case'}{$field} = $old;
    }
    }

':x-inf-route-key'=>'GetID'