Perl & Tru64: Prototype mismatch: sub ErrorLog::ErrorLog ($$$$;_at_) vs none at /usr/aselocal/lib/ErrorLog.pm line 229.

From: <romero_a5_at_tsm.es>
Date: Fri, 26 Jan 2001 09:54:29 +0100

Hello,

     I've Tru64 4.0F version installed PK 4 and 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(_at_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 ($$$$;_at_) vs none at /usr/aselocal/lib/ErrorLog.pm line 229.
Prototype mismatch: sub ErrorLog::ErrorTrace ($$$$;_at_) vs none at /usr/aselocal/lib/ErrorLog.pm line 271.
Prototype mismatch: sub ErrorLog::ErrorSetup ($$;_at_) 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


Anybody could help me about this?

Please, answer to romero_a5_at_tsm.es

Thanks in advance.
Received on Fri Jan 26 2001 - 08:59:06 NZDT