Doesn’t work on Perl 5?

This doesn’t seem to work on my box, running Perl 5.32.1. I don’t know Perl well enough to fix. Here’s the run and log:

./nagiosAck.pl -r –test
given is experimental at ./nagiosAck.pl line 597.
when is experimental at ./nagiosAck.pl line 598.
when is experimental at ./nagiosAck.pl line 601.
given is experimental at ./nagiosAck.pl line 638.
when is experimental at ./nagiosAck.pl line 639.
when is experimental at ./nagiosAck.pl line 640.
given is experimental at ./nagiosAck.pl line 694.
when is experimental at ./nagiosAck.pl line 695.
when is experimental at ./nagiosAck.pl line 696.
when is experimental at ./nagiosAck.pl line 697.
when is experimental at ./nagiosAck.pl line 698.
when is experimental at ./nagiosAck.pl line 699.
when is experimental at ./nagiosAck.pl line 700.
when is experimental at ./nagiosAck.pl line 701.
when is experimental at ./nagiosAck.pl line 702.
when is experimental at ./nagiosAck.pl line 703.
when is experimental at ./nagiosAck.pl line 704.
when is experimental at ./nagiosAck.pl line 705.
given is experimental at ./nagiosAck.pl line 736.
when is experimental at ./nagiosAck.pl line 737.
when is experimental at ./nagiosAck.pl line 738.
Experimental keys on scalar is now forbidden at ./nagiosAck.pl line 430.
Type of arg 1 to keys must be hash or array (not private variable) at ./nagiosAck.pl line 430, near “$service) ”
Execution of ./nagiosAck.pl aborted due to compilation errors.