From 59b859a9cc27d671c4eebe880d3b590c8c85e30b Mon Sep 17 00:00:00 2001
From: Guillem Jover <gjover@sipwise.com>
Date: Fri, 6 Feb 2026 10:55:16 +0100
Subject: [PATCH] MT#62763 perl: Do not mix low and high boolean operators

Warned-by: perlcritic
Fixes: ValuesAndExpressions::ProhibitMixedBooleanOperators
Change-Id: Ie6611790edffb69b92c1ea8170752b5fdb76665a
---
 perl/NGCP/Rtpengine/AutoTest.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/NGCP/Rtpengine/AutoTest.pm b/perl/NGCP/Rtpengine/AutoTest.pm
index 38fee3bdf..4a90e9b67 100644
--- a/perl/NGCP/Rtpengine/AutoTest.pm
+++ b/perl/NGCP/Rtpengine/AutoTest.pm
@@ -224,7 +224,7 @@ sub srtp_snd {
 }
 sub exts {
 	my ($exts) = @_;
-	$exts && @$exts or return '';
+	return '' unless $exts && @$exts;
 	my $e = '';
 	my $h;
 	# long format needed if IDs 16+ are used, or if the length is more than 16, or if