MT#55939 no base64 decoding for uninitialized values

Change-Id: I829888dcfc37313434346d9ad369495203ed88a7
3 years ago · c36782c0aa
parent 6e59553407
commit c36782c0aa
1 changed files with 2 additions and 3 deletions
--- a/NGCP/CDR/Exporter.pm
+++ b/NGCP/CDR/Exporter.pm
@ -146,9 +146,8 @@ sub config2array {
    if ('ARRAY' eq ref($val)) {
        return @$val;
    } elsif ($serialized) {
-        my $decoded = decode_base64($val);
-        die("invalid config value '$val': " . $@ . "\n") if $@;
-        #$decoded =~ s{\A\$VAR\d+\s*=\s*}{};
+        my $decoded;
+        $decoded = decode_base64($val) if defined $val;
        ## no critic (BuiltinFunctions::ProhibitStringyEval)
        $val = eval($decoded);
        die("invalid config value '$decoded': " . $@ . "\n") if $@;