Question: $* is no longer supported as of Perl 5.30
We are moving from an old unix server with perl 5.8.8 to a new server with Perl 5.32. regex error We have a script that starts with following lines:
eval "exec /usr/local/bin/perl -S $0 $*" if $running_under_some_shell; # this emulates #! processing on NIH machines. # (remove #! line above if indigestible) eval '$'.$1.'$2;' while $ARGV =~ /^([A-Za-z_]+=)(.*)/ && shift; # process any FOO=bar switches $[ = 1; # set array base to 1 $, = ' '; # set output field separator $\ = "\n"; # set output record separator
The script doesn't work. For the line
"eval "exec /usr/local/bin/perl -S $0 $*"" we get:
$* is no longer supported as of Perl 5.30 at /usr/local/ccmngr/bin/check_log.pl line 12.
If I remove the
eval line, we get the following for line
$[ = 1;:
Assigning non-zero to $[ is no longer possible at /usr/local/ccmngr/bin/check_log.pl line 20.
If anybody has an idea and like to share, it will be great help.