From fd292b2cf02334864aecce01e1717dac9e45421c Mon Sep 17 00:00:00 2001 From: Rene Krenn Date: Wed, 29 Jan 2025 10:51:55 +0100 Subject: [PATCH] MT#62020 DSPath: prevent retrieve_key_from_non_hash for undef values Change-Id: I24291f93fb4a38b1f18fd8851f34c0a268c8ccbf --- lib/NGCP/BulkProcessor/DSPath.pm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lib/NGCP/BulkProcessor/DSPath.pm b/lib/NGCP/BulkProcessor/DSPath.pm index 2b37786..e115b82 100644 --- a/lib/NGCP/BulkProcessor/DSPath.pm +++ b/lib/NGCP/BulkProcessor/DSPath.pm @@ -99,10 +99,12 @@ sub get { # check if last element is reached if ($rest) { - if (defined $value and (reftype $value eq 'HASH' or blessed $value)) { - $value = $self->get($rest,$value); - } else { - $self->{callbacks}->{retrieve_key_from_non_hash}->($data, $key, $index, $value, $rest); + if (defined $value) { + if (reftype $value eq 'HASH' or blessed $value) { + $value = $self->get($rest,$value); + } else { + $self->{callbacks}->{retrieve_key_from_non_hash}->($data, $key, $index, $value, $rest); + } } }