Prototype mismatch: sub ErrorLog::ErrorLog ($$$$;@) vs none at /usr/aselocal/lib/ErrorLog.pmline 229.

Hello,

     Despite of haven't any experience with Perl, I've this problem:


    - Perl version installed 5.0.0.4 for Tru64 Unix.
    - Script code:

#!/bin/perl
$BASE_DIR = "/usr/aselocal";
$LIB_DIR = "$BASE_DIR/lib";

$BIN_DIR  = "$BASE_DIR/bin";
push(@INC,"$LIB_DIR");

printf ("Before require's statement \n\n");
require ErrorLog;
printf ("\nAfter require's statement \n");
import ErrorLog;
printf ("\n End of program execution \n");


    - Execution results:

Before require's statement

Prototype mismatch: sub ErrorLog::SetErrorLogFile ($) vs none at /usr/aselocal/lib/ErrorLog.pm line 160.
Prototype mismatch: sub ErrorLog::ErrorLog ($$$$;@) vs none at /usr/aselocal/lib/ErrorLog.pm line 229.
Prototype mismatch: sub ErrorLog::ErrorTrace ($$$$;@) vs none at /usr/aselocal/lib/ErrorLog.pm line 271.
Prototype mismatch: sub ErrorLog::ErrorSetup ($$;@) vs none at /usr/aselocal/lib/ErrorLog.pm line 324.
Prototype mismatch: sub ErrorLog::ErrorReset () vs none at /usr/aselocal/lib/ErrorLog.pm line 351.

After require's statement

 End of program execution

    - I've tested all about the Perl's software installation and it's all OK.


Anybody could help me about this?

Please, answer to romero_a5@tsm.es

Thanks in advance.

• Prototype mismatch: sub ErrorLog::ErrorLog ($$$$;@) vs none at /usr/aselocal/lib/ErrorLog.pmline 229. by romero_a5