MT#61459 Do not use Perl indirect object syntax

This syntax is discouraged, and it is not enabled by default any longer
starting with the 5.36 feature bundles. Stop using it so that we can
eventually bump our minimum required Perl version.

Fixes: Objects::ProhibitIndirectSyntax
Warned-by: perlcritic
Ref: https://metacpan.org/pod/feature#The-'indirect'-feature
Change-Id: I353f5aa7f7ac12d64fb02b791b791394de4261fe

utils/kernel-intercept-dump.pl

@@ -15,7 +15,7 @@ my $COMBINE = 1;
 # 0: don't combine any streams. each stream gets written to its own pcap file
 # 1: combine all streams of one call into one pcap file
 
-my $i = new Linux::Inotify2 or die;
+my $i = Linux::Inotify2->new or die;
 $i->blocking(0);
 
 $i->watch('/var/spool/rtpengine', IN_CLOSE_WRITE | IN_DELETE, \&handle_inotify) or die;

utils/rtpengine-ctl

@@ -51,7 +51,7 @@ if (!$argumentstring || !$optret || $port <= 0 || $port > 65535) {
 }
 
 # create a connecting socket
-my $socket = new IO::Socket::INET (
+my $socket = IO::Socket::INET->new(
     PeerHost => $ip,
     PeerPort => $port,
     Proto => 'tcp',