tyler.durden/centreon-plugins
1
0
Fork 0
mirror of https://github.com/centreon/centreon-plugins.git synced 2025-07-31 01:24:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

backend curl: header case insensitive

Browse Source
This commit is contained in:
garnier-quentin 2019-03-13 09:21:48 +01:00
parent 721543f96c
commit 749eef09ff
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
centreon-plugins/centreon/plugins/backend/http/curl.pm
View File

@ -251,7 +251,7 @@ sub parse_headers {
if (!defined($self->{response_headers_parse}->{$header}));
push @{$self->{response_headers_parse}->{$header}}, $value;
}
$header = $1;
$header = lc($1);
$value = $2;
} elsif (/^\s+(.*)/) {
$value .= ', ' . $1;
@ -388,8 +388,8 @@ sub get_header {
my ($self, %options) = @_;
return undef
if (!defined($self->{response_headers_parse}->{$options{name}}));
return wantarray ? @{$self->{response_headers_parse}->{$options{name}}} : $self->{response_headers_parse}->{$options{name}}->[0];
if (!defined($self->{response_headers_parse}->{ lc($options{name}) }));
return wantarray ? @{$self->{response_headers_parse}->{ lc($options{name}) }} : $self->{response_headers_parse}->{ lc($options{name}) }->[0];
}
sub get_code {