>
> Is doing the things below terribly bad?  We're actually doing 90% of the
> stuff in embperl, but we ran into problems in scoping when using
> my (), so we
> switched to use vars.
>
> #!/usr/bin/perl -w
>
> # some sample code
> use strict;
> use MyStuff;
> use vars qw ($dbh $foo $bar $sql $sth $rc);
>
> $dbh = dbConnect;
>

You have to make sure that all these vars get undef'ed at the end of your
request, otherwise the content will take up memory until they are assigned a
new value. Inside a Embperl page, Embperl will do this for you, but in your
own modules your are responsible for doing this on your own.

You may install Apache::Status in your system, to browser thru your symbol
table, to see which vars are defined with which content.


Gerald


-------------------------------------------------------------
Gerald Richter    ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting

Post:       Tulpenstrasse 5         D-55276 Dienheim b. Mainz
E-Mail:     [EMAIL PROTECTED]         Voice:    +49 6133 925151
WWW:        http://www.ecos.de      Fax:      +49 6133 925152
-------------------------------------------------------------

Reply via email to