小编Red*_*man的帖子

我继承了一个旧的perl应用程序,我正试图复活.可悲的是,我不是一个perl人(而且只是一个新手开发人员).通过在线查找解决方案,我已经成功解决了这个应用程序的其他问题,但到目前为止我已经找不到解决方案了,所以觉得是时候征求意见了.

我找到了一个障碍,寻找有关如何解决我收到的错误的建议.

这是错误:

Can't locate object method "new" via package "CGI" at 
/opt/app/htdocs/lib/APP/CGI.pm line 26.Compilation failed 
in require at /opt/app/htdocs/lib/APP/CGI.pm line 4.

这是/opt/app/htdocs/lib/APP/CGI.pm的前26行:

 package APP::CGI;

 use CGI;

 use CGI::Carp qw(fatalsToBrowser set_message);
 use APP::Error;

 BEGIN {
      sub handle_errors {
         my $msg = shift;
         &APP::Error::error($msg);
     }
     set_message(\&handle_errors);

 }

 use strict;
 # hack:  added these to resolve "can't locate" errors
 use lib qw(/opt/app/htdocs);
 use lib qw(/opt/app/htdocs/lib);
 use lib qw(/opt/app/htdocs/lib/APP);
 use lib qw(/opt/app/htdocs/lib/APP/Service);
 # end hack
 use vars qw/ $CGI %REDIRS /;

 $CGI = …