addpop script is not working


Well-Known Member
Aug 12, 2001
cPanel Access Level
Root Administrator
addpop script on my server is not working...
not even when i run it from command line
i try to debug it and got this.
{ns} root TC 8:55 [/scripts]> perl -d addpop
Default die handler restored.

Loading DB routines from version 1.07
Editor support available.

Enter h or `h h\' for help, or `man perldebug\' for more help.

main::(addpop:10): print \"Please enter the pop account to add (ex. bdraco\\ \";
DB<1> [email protected]
Array found where operator expected at (eval 10)[/usr/lib/perl5/5.6.1/] line 2, at end of line
(Missing operator before ?)
syntax error at (eval 10)[/usr/lib/perl5/5.6.1/] line 2, near \"[email protected]\"


Could someone points me where is the problem.
I have the same script on other server but with perl 5.005 and that script is working.
Is there some changes between 5.005 and 5.6.1 perl version or something other?