From bc071ddadd495a83736bf9e63254570309b1d530 Mon Sep 17 00:00:00 2001
From: Richard Fuchs <rfuchs@sipwise.com>
Date: Fri, 28 Feb 2025 08:30:45 -0400
Subject: [PATCH] MT#55283 silence perl test warnings

Change-Id: Ib881bfc3311a0d1e19a2d95bca671a607b678f08
(cherry picked from commit e234e11c98e5d91a1ae204096b255c799ce2e15c)
---
 t/auto-daemon-tests-redis-json.pl | 4 ++--
 t/auto-daemon-tests-redis.pl      | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/t/auto-daemon-tests-redis-json.pl b/t/auto-daemon-tests-redis-json.pl
index 9f437142b..b957e6867 100755
--- a/t/auto-daemon-tests-redis-json.pl
+++ b/t/auto-daemon-tests-redis-json.pl
@@ -6,7 +6,7 @@ use NGCP::Rtpengine::Test;
 use NGCP::Rtpclient::SRTP;
 use NGCP::Rtpengine::AutoTest;
 use Test::More;
-use Test2::Tools::Compare qw(like);
+use Test2::Tools::Compare qw();
 use Socket qw(AF_INET SOCK_STREAM sockaddr_in pack_sockaddr_in inet_aton);
 use JSON;
 use Data::Dumper;
@@ -77,7 +77,7 @@ $NGCP::Rtpengine::req_cb = sub {
 	alarm(0);
 	my $json = decode_json($buf);
 	#print Dumper($json);
-	like($json, $json_exp, "JSON");
+	Test2::Tools::Compare::like($json, $json_exp, "JSON");
 	redis_io("\r\n\$2\r\nEX\r\n\$5\r\n86400\r\n",
 		"+OK\r\n",
 		"req EXPIRE");
diff --git a/t/auto-daemon-tests-redis.pl b/t/auto-daemon-tests-redis.pl
index b8e4c96d0..19cc31f5e 100755
--- a/t/auto-daemon-tests-redis.pl
+++ b/t/auto-daemon-tests-redis.pl
@@ -6,7 +6,7 @@ use NGCP::Rtpengine::Test;
 use NGCP::Rtpclient::SRTP;
 use NGCP::Rtpengine::AutoTest;
 use Test::More;
-use Test2::Tools::Compare qw(like);
+use Test2::Tools::Compare qw();
 use Socket qw(AF_INET SOCK_STREAM sockaddr_in pack_sockaddr_in inet_aton);
 use Bencode;
 use Data::Dumper;
@@ -76,7 +76,7 @@ $NGCP::Rtpengine::req_cb = sub {
 	alarm(0);
 	my $json = Bencode::bdecode($buf, 1);
 	#print Dumper($json);
-	like($json, $json_exp, "JSON");
+	Test2::Tools::Compare::like($json, $json_exp, "JSON");
 	redis_io("\r\n\$2\r\nEX\r\n\$5\r\n86400\r\n",
 		"+OK\r\n",
 		"req outro");