From 64a96befd85ae41d2e80335f97a1336819f31570 Mon Sep 17 00:00:00 2001
From: Rene Krenn <rkrenn@sipwise.com>
Date: Tue, 10 Apr 2018 14:07:53 +0200
Subject: [PATCH] TT#35261 fix callroutingverify allowed_cli wildcards

Change-Id: Ice73edfbca3fa64afdf182e4a38c869874e2e438
---
 lib/NGCP/Panel/Controller/CallRouting.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/NGCP/Panel/Controller/CallRouting.pm b/lib/NGCP/Panel/Controller/CallRouting.pm
index c0590cc54a..dc644dfee4 100644
--- a/lib/NGCP/Panel/Controller/CallRouting.pm
+++ b/lib/NGCP/Panel/Controller/CallRouting.pm
@@ -250,7 +250,9 @@ sub callroutingverify :Chained('/') :PathPart('callroutingverify') :Args(0) {
                 }
             }
         }
-        my $match = map { $_ =~ s/\*/.*/g;
+        my $match = map { local $_ = $_;
+                          $_ =~ s/\*/.*/g;
+                          $_ =~ s/\?/.?/g;
                           $data->{caller_in} =~ /^$_$/;
                         } @{$usr_prefs{allowed_clis}};
         if ($match) {