Can't use an undefined value as a symbol reference at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 5316.
 at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 5316
        DB::print_lineinfo() called at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11
        eval {...} called at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11
        require IO/Socket.pm called at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 6050
        DB::connect_remoteport() called at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 1480
        require perl5db.pl called at hello.pl line 0
        main::BEGIN() called at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11
        eval {...} called at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11
BEGIN failed--compilation aborted at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11.
 at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11
        require IO/Socket.pm called at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 6050
        DB::connect_remoteport() called at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 1480
        require perl5db.pl called at hello.pl line 0
        main::BEGIN() called at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11
        eval {...} called at /usr/local/lib/perl5/5.8.8/mach/IO/Socket.pm line 11
Compilation failed in require at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 6050.
Compilation failed in require.
 at hello.pl line 0
        main::BEGIN() called at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 0
        eval {...} called at /usr/data1/apache/home/lucky/local/perl/debug/epic/perl5db.pl line 0
BEGIN failed--compilation aborted.
 at hello.pl line 0