nonstop op_server.pl errors

[nycvelo]

PBX in a Flash Version :1.2
Operating System : 32 Bit Centos 5 (Final)
Kernel: 2.6.18-92.1.6.el5 #1 SMP
Asterisk Version : 1.4.20.1
Ran update-scripts :Yes
Ran update-fixes :Yes
Ran update-source :Yes

Every 30-60 seconds the system prints this error on the console:

Use of uninitialized value in substitution (s///) at /var/www/html/panel/op_server.pl line 6543.
Use of uninitialized value in substitution (s///) at /var/www/html/panel/op_server.pl line 6544.

Those two lines of code are preceded by a comment saying the following is a "horrible hack" -- lines 6543-44 (pasted below) are the second set of $traduc assignments.

Thanks in advance for clues on shutting up this message.


op_server.pl snippet:

# Horrible hack, if variable ends in &, set the text
# between brackets so it will be displayed as a whole in the
# button's clid area
$varsub = substr( $varsub, 0, -1 );
my ( $var1, $var2 ) = split( /,/, $varsub );
$traduc =~ s/\$1/$var1/g if defined $var1;
$traduc =~ s/\$2/$var2/g if defined $var2;
$traduc =~ s/\$1//g;
$traduc =~ s/\$2//g;
$dosoriginal = $dos;
$dos = "[" . $traduc . "]";
$buttontext = $dos;
}
else {
my ( $var1, $var2 ) = split( /,/, $varsub );
$traduc =~ s/\$1/$var1/g if defined $var1 && $var1 ne "";
$traduc =~ s/\$2/$var2/g if defined $var2 && $var1 ne "";
$traduc =~ s/\$1//g;
$traduc =~ s/\$2//g;
$dosoriginal = $dos;
$dos = $traduc;
}

 

[nycvelo]

I *think* this issue was resolved by reinstalling all Asterisk modules from FreePBX's Admin/Setup/Module Admin menu. Even though all mods were installed before, they did not appear in the menus.

The menus are a lot more complete after the reinstall. Better yet, a console window has been quiet for around an hour, compared with perl errors every 30-60 seconds before.