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: I714b22191afcc3b4d2c82c32e3ea359b08b3caed
mr13.1.1
Guillem Jover 2 years ago
parent 60d2c8a974
commit f03c954a4d

@ -8,7 +8,7 @@ my $config_file = '/etc/ngcp-cleanup-tools/acc-cleanup.conf';
my $c;
eval {
$c = new NGCP::Cleanup(config_file => $config_file);
$c = NGCP::Cleanup->new(config_file => $config_file);
$c->process;
};
if ($@) {

Loading…
Cancel
Save