Hi everybody!
I have a small problem with the APR::Pool::cleanup_register;
I get this error_message:
ModPerl::Registry: Usage: APR::Pool::cleanup_register(p, cv, arg=Nullsv) at ....
In script a.pl it works fine, in other one I get this error message.
Here is the piece of code:
....
use vars qw ($mydate %FORM %PARAM);
if ($ENV{MOD_PERL}) {
require APR::Pool;
&init_globals();
shift->pool->cleanup_register(&init_globals());
}
sub init_globals {
$mydate = undef;
%FORM = ();
%PARAM = ();
}
Any Ideas?
I'm running RedHat ES 3.0
Thanks
Denis
"THINK THE WEB WAY."
---------------------------------------------------
NCM - NET COMMUNICATION MANAGEMENT GmbH
---[ Denis Banovic - CTO
mailto:[EMAIL PROTECTED]
---[ M�hlstrasse 4a
AT - 5023 Salzburg
Tel. 0662 / 644 688
---[ Fax: 0662 / 644 688 - 88
http://www.ncm.at
---------------------------------------------------
____________
Virus checked by G DATA AntiVirusKit
Version: AVK 15.0.1429 from 08.12.2004
Virus news: www.antiviruslab.com
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
