perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Denis Banovic" <denis.bano...@ncm.at>
Subject Cleanup_register
Date Thu, 09 Dec 2004 07:56:54 GMT
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:denis.banovic@ncm.at
---[  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


Mime
View raw message